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aEPHANT NEVER HNieETS. 



A full line of top-quality floppies, in virtually every 5 '/a" and 8" model, for compatibility with virtually every computer on the market. 
Guaranteed to meet or exceed every industry standard, certified 100% error-free and problem-free, and to maintain its quality for at least 12 million passes 

(or over a lifetime of heavy-duty use). 



Contact Dennison Computer Supplies, Inc., 55 Providence Highway, Norwood, MA 0Z06Z or call toll-free i -800-343-841 3. 
In Massachusetts, call collect (6-17) 769-8150. Telex 951-624- 




WATCH OUT ATARI ! 
AT-D2 HAS LANDED! 
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IRAK'S floppy and hard disk drive systems for 
the Apple and IBM-PC are available at many 
Computerland and other fine stores worldVi/ide. 



. . .WITH IT'S FLEET OF THE MOST ADVANCED 
SINGLE AND DOUBLE DENSITY DRIVE SYSTEMS 
IN THE UNIVERSE - TOTALLY COMPATIBLE WITH 
ATARI* COMPUTER MODELS 400, 800, 600XL, 
1200XL, 1400XL, AND 1450XL. 

DOCK YOUR FAVORITE PRINTER DIRECTLY TO 
OUR DRIVE'S BUILT-IN PARALLEL PRINTER 
INTERFACE. THERE'S NO NEED TO BUY AN EX- 
PENSIVE ATARI 850 MODULE. 

THE COMMAND CONTROL PANEL FEATURES 
READ, WRITE AND DENSITY INDICATORS, ATRACK 
COUNTER TO LOCATE EVERY BIT OF YOUR DATA 
AND A TOUCH-SENSITIVE SWITCH TO PROTECT IT, 

WARP SPEED OF UP TO 18 TIMES FASTER THAN 
ANY OTHER ATARI DRIVE IS ACHIEVED WITH OUR 
OPTIONAL TURBO-CHARGED SOFW\/ARE. 

►awesome power — DESTROY A PLANET 
'OR LEARN HOW ONE IS CREATED. BALANCE 
YOUR CHECKBOOK OR WRITE A BESTSELLER. 
LEARN A NEW LANGUAGE OR CREATE ONE. 

IT'S MAGNIFICENTLY SIMPLE! — JUST PLUG IT 

INANDLIFT-OFFI 
■ Atan IS a registered trademark of Atari, Inc 



TRAK GIVES YOU THE MOST STORAGE FOR 
YOUR DOLLAR I 




OUR FLAGSHIP, AT-D2, WITH TWICE THE STOR- 
AGE CAPACITY OF THE ATARI 810 DRIVE PLUS A 
PRINTER INTERFACE AND COMMAND CON- 
TROL PANEL, HAS A VALUE OF OVER S1000 YET 
COSTS LESS THAN $500! 

SEE YOUR DEALER NOW FOR A TEST FLIGHT, OR 

call toll free: 1-800-323-4853 

in Illinois, call collect: 1-312-968-1716 
TWX 910-222-1848 




microcomputer corporation 1511 Ogden Ave., Downers Grove. IL 60515 
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IMnts with built-iQ 
format or lets you 
create your own: 
center, underline. 
Boldface, elongated, 
proportional and 
condensed print. 



Inserts and deletes 
characters, lines or 
blocks of text. 



Duphcates and moves 
blocks of text. 



Searches for and/or 
replaces words or 
phrases, one at a time 
or all at once. 




Changes line 
spacing, margins, 
print type, 
paragraph indents 
anywhere in the 
document. 



Instantly reformats. 



Enters text easily, 
with word wrap, 
one main menu and 
helpful prompts. 



Creates multi-line 
headers and footers. 



Prints double 
colirmns, form 
letters, m^ultiple 
copies of a page or 
document, at the 
touch of a key. 



Numbers pages and 
creates section 
numbers 
automatically. 



Corrects spelling 
(with extra software). 



Chains and merges 
files. 



Has "print preview": 
you can check your 
copy before it's 
printed. 



IZbu can't find a friendlier, more 

powerful word processor at twice the price. 

New AfcariWriter: Under ^100. 



Now you can do multi-feattired word pro- 
cessing at home , simply. At a family budget price . 

Our ROM-based cartridge technology means 
you can use new AtariWriter on any ATARI® 
Home Computer (even 16K) for personal and 
business correspondence, term papers, commit- 
tee reports, mailings, etc. 

It also lets you choose between cassette and 
disk storage systems. 

One very special AtariWriter feattu-e: you 
can correct as you write, without switching back 
and forth between Create and Edit modes. 

o 1983 Atari. Inc. All rights reserved. W^ A Wamer Communications Company 



And our memory buffer offers an "luido" 
command to let you change your mind, and re- 
store text you've just deleted. 

Check into oiu" remarkable AtariWriter, and 
our choice of letter quality and dot matrix print- 
ers, also reasonably priced, at Atari dealers. CaU 
800-538-8543 for dealer nearest you. In Califor- 
nia, call 800-672-1404. 



IZbull do more inrith 
Atari Home Conqniters. 
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Remember those great arcade games of the past? 

Games like Bally Midway's™ Seawolf II.™ As 
sub commander, you torpedo enemy ships moving 
at different speeds. Sink as many as you can, but 
watch out for the mine fields. 

And Bally Midway's Gun Fight™ In the most 
famous shootout of all time, you'd better be a straight 
shooter and fast on the draw. 

Exidy's™ Starfire™ gives you outerspace graphics 
that are out of this world. Plus a starship with laser 
cannons to help you rid yourself of alien forces. 

And there's Exidy's Fire One!™ Hone in on the 
enemy with sonar. Then it's up periscope and 
torpedoes away. 



EPYX has brought the arcade classics home— at 
the right price for you. We've combined the Bally 
Midway classics Seawolf II and Gun Fight on one 
disk and Exidy's classics Starfire and Fire One 
on another So get the arcade classics today and 
have a blast-from-the-past on us. 

One or two players; joystick controlled; arcade 
style graphics and sound. 



EDYX 

m COMn/TER SOFTWARE 

Strategy Games for the Action-Game Player 
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by Brian Moriarty 



I have been an Atari 800 owner and subscriber to 
ANALOG for about a year. Most of this time, there 
have been stories and rumors about Atari getting out of 
the home computer business. I have continued to invest 
time and money in my Atari, and hoping for the best. 

In the last tvuo months, computer stores have been 
dropping the Atari line, and some of your advertisers have 
been returning my checks, saying that they no longer carry 
Atari software (e.g.; Eastcoast Software). 

1 would appreciate an explanation of what is happen- 
ing at Warner / Atari, and your opinion on the future of 
Atari home computers. The natural tendency is to ignore 
a problem or sugar-coat it, but the most responsible action 
is to deal with it directly. 

Clyde Lawrence 
Miami, Florida 

Nobody wants to know what's going on at Atari 
more than we do! Despite our status as a large and 
ancient Atari magazine, we have considerably less 
access to Warner's board chamber than The Wall 
Street fournal. But since you and many other 
ANALOG readers are asking, here's my limited 
view of what's going down in Sunnyvale. 

Early last year, Atari lost its Prime Mover status in 
the low-end computer market to an undeserving 
Commodore. They also lost millions of dollars, 
hundreds of employees and corporate President Ray 
Kassar. Most importantly, they lost the confidence 
of their stockholders and retailers, and the buying 
public. 

A lesser company would have shriveled up and 
blown away under this kind of pressure. It happened 
to Osborne; but Warner was determined that it was 
not going to happen to Atari. So they hired James 
Morgan away from Phillip-Morris (the cigarette 
conglomerate) to steer their failing Atari division 
away from the path to extinction. 

So far, it looks as if Warner made a wise choice. 
Mr. Morgan is handling the fragile remains of Atari 
with caution and ruthless conservatism. He's slash- 
ing overhead, eliminating waste and concentrating 
resources in a heroic effort to keep his rapidly 
shrinking company afloat. 

Some of Mr. Morgan's decisions haven't made 
him very popular. Many projects initiated under 



Kassar's flamboyant administration, including the 
1400 and 1600XL computers and the CP/M Module, 
have been quietly cancelled. Major new product 
announcements are at a virtual standstill. Retailers 
are furious at Morgan's hard-line policies regarding 
product returns and quotas. But Warner didn't hire 
Morgan to play Mr. Popularity. They hired him to 
put Atari back in the black, and he is doing it in spite 
of the head-shakers on Wall Street and the "1 told 
you video games were just a fad" attitude of the 
press. 

Evidence of Atari's recovery isn't hard to find. 
600XL and 800XL computers are selling as fast as 
Taiwan can build them. New Atari accessories and 
software titles arrive at our office on a weekly basis 
— and Morgan is still talking about releasing a 
1450XLD in one form or another later this year, 
although I get the impression that he's doing it 
mainly for the sake of having something to show at 
CES. So, barring sudden corporate buy-outs, unex- 
pected calamities or an Act of IBM, Atari's Home 
Computer Division will probably stay reasonably 
healthy for at least another year, perhaps much 
longer. 

Now let me tell you why I had my fingers crossed. 
The home computer industry thrives on things that 
are New, Different and Exciting, adjectives which do 
not apply to the current lineup of XL machines. 
Atari is still the most advanced computer you can 
buy for the money. But how much longer will it be 
before somebody comes along and offers more for 
less? Rather than waste precious time on yet another 
8-bit XL, I'd like to see Atari throw everything 
they've got into a second-generation machine that's 
as far ahead of the competition as the 800 was back 
in 1979. I know for a fact that Atari research has 
developed all sorts of wonderful new toys. How long 
will it be before Morgan will dare to unleash them? 
Summer CES isn't far away — and it may be Atari's 
last chance to maintain their position as a technological 
leader. D 



CORRECTION FROM ISSUE #15 

In the 600XL photograph on page 36, the 
labels on the ANTIC and GTIA chips were 
accidentally switched. 



ATARI SINGS YOUR FAVORITE SONGS!!! 

THE Original VOICE BOX Speech Synthesizer by the ALIEN GROUP has received rave reviews: „„ 

MICRO COMPUTING-"The VOICE BOX injects an endearing personality to your computer. The possibilities are enormous."^^ 

COMPUTE-"The VOICE BOX offers more human-like tones and does not blank out the screen." | 

CREATIVE COMPUTING-"English text and phonetic code may be 

freely intermixed rather than requiring separate modes as is the cose 

without exception with every other speech system. A mode called 

talking face displays an animated face with impressive lip sync 

animation." I 

ANTIC-"There is a great potential for teaching children to spell and 

an added dimension to games overall. I believe the VOICE BOX is i 

well worth the price tag." 

ANALOG-"For ATARI owners who want to add speech to their 

programs, the Alien Group VOICE BOX is probably the best 

choice." 

POPULAR SCIENCE-"The speech quality is excellent. Besides 

creating speech, the software has a bit of fun with graphics." 

and on the new VOICE BOX II ^ . 

TIME MAGAZINE-"Machine of the Year" "The VOICE BOX by the 

Alien Group enables an ATARI to say aloud anything typed on its iNrncPOPATF twf <;iwriwr wiiaaam cArc 

keyboard in any language. It also sings "Amazing Grace" and '""'^Sjo'^^il SoGrSJ Jd SSes' ' 
When I m 64 or anything else that anyone wants to teach it. 




VOICE BOX II 
Speech & Singing Synthesizer 



To order by moil send a check or money order to the ALIEN GROUP 
for $169. 



THE ALIEN GROUP 

27 West 23rd Street (212)741-1770 

New York, NY 10010 



The New VOICE BOX II for ATARI plugs into the serial port of the ATARI 
400/800 with sound coming out of the TV/monitor. 48K DISK is re- 
quired. It has all of the features of the original VOICE BOX plus many 
exciting new hardware and software features: 

• The ability to sing with voice and 3 part music. 

• A library of 30 famous songs. 

•A comprehensive music system that allows the user to easily enter or 
modify new songs. 

• Software that con convert the bottom two rows of the ATARI keyboard 
into a piano with a range of 3'/2 octaves using the shift and control 
keys. 

• Programmable musical sound effects such as tremolo, vibrato, glis- 
sando and click track. 

• A singing human face with lip-sync animation designed by Jerry 
White. 

• A talking or singing ALIEN face with software that allows the user to 
change the face and 8 mouth patterns as he sees fit. 

• The ability to speak with inflection and feeling. 

• Can speak in a foreign language with correct foreign spelling as 
input. 

• A talk and spell program by Ron Kramer. Users can program any 
vocabulary for this spelling game. In fact, this program can even 
speak in a foreign language like French, where the user must spell 
the correct word in English, or vice versa. 

• GREEN GOBLINS-A talking arcade game by John Wilson. 

• Random Sentence Generator-An amusing grammar game that 
helps teach school children to identify ports of speech and recognize 
a variety of sentence structures. 

• NUMBER SPEAK-A subroutine by Scott Matthews that converts up to 
a 9 digit number into normal English pronunciation. Ideal for build- 
ing your own math games. 

• STUD POKER-A talking poker game by Jerry White. 

• The screen never blanks out while talking or singing. 

• Singing or speaking subroutines can be incorporated into your 
programs, requiring as little as 100 bytes of RAM plus 5 bytes for 
each word. 

• Price $169.00 includes VOICE BOX I! and all of the above software. 

• Inquire about our discounts for educational institutions. 



ALSO AVAILABLE AT LEADING COMPUTER STORES THROUGHOUT THE WORLD. 

Atari is a registered trademarl< of Warner Communications. 
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I am writing this letter to make a 
few comments about an article 
reviewing the new Atari 600XL in 
Issue #15. 

1 would first like to say that I 
enjoy your magazine very much, 
but this one particular article dis- 
turbed me. 

First of all, it states that the 
1400, 1450 and 1600XL projects 
have been put on "indefinite 
hold. ' ' Naturally I was worried, so 
I made a call to Atari itself and 
they confirmed that they were not 
on indefinite hold, but that their 
release dates were just rescheduled 
for later in the year. 

Next, you said that the key- 
board was almost comparable to 
the 800's, but I've seen a 600 and I 
own an 800, and I thought the 
600's keyboard was significantly 
better. 

To go on, you said that the 
600XL "isn't as exciting or ad- 
vanced as the 400/800 series 
when it first appeared in 1979." I 
say you're living in the past. Wake 
up! The expansion capability far 
surpasses that of any other com- 
puter on the market today. You 
also said, "These new XL compu- 
ters are merely repackaged 800s." 
Not true! The new 600XL may not 
be different in some respects, but 
there are obvious changes for what 
I would call the better. They made 
the RAM expandable to 64K (not 
48K as implied in your article). 
Having an on-board BASIC is also 
helpful to relieve you of the taking 
in and out of cartridges all the 
time. 

One last note about Alan Alda. 
He is paid to do commercials as 
Alan Alda, not, as you say, "a box 
of Hawk eyes." 

Andrew Urban 

Ulysses, Kansas 



The 1400 and 1600XL projects are 
no longer on "indefinite hold." Ac- 
cording to Atari officials at January 
CES, they've been cancelled. Who- 
ever you talked to at Atari wasn't up 
to speed. The 1450XLD is still alive as 
of this writing, but Atari won't specu- 
late on when it's coming or what it 
will be like when it does arrive. Still 
sounds pretty indefinite to me. 

You're entitled to your opinion on 
the relative merits of the 800 and 
6ooXL'5 keyboards. As 1 stated in the 
article, the 600 keyboard is very good, 
especially considering the price of the 
unit. But everyone I've talked to 
who's used the 600XL for any length 
of time agrees that the old 800 key- 
board is more comfortable. 

The new parallel expansion bus 
does indeed make the 600 potentially 
more expandable than a 400 or 800, 
and 1 made a point of noting that fact 
in my article. But to say that the 
6oo%L's expansion capabilities "far 
surpass any other computer on the 
market today" is ludicrous. Have you 
ever looked at the back panel of an 
IBM PC, or inside an Apple He? 
Those slots aren't designed to hold 
credit cards. Even the lowly Commo- 
dore 64 has significant expansion 
potential. 

1 did not "imply" that Atari made 
the 6ooXL's RAM expandable to 
only 48K. 1 said it outright! There 
may be 64K's-worth of RAM chips in 
their (so far nonexistent) memory 
expander, but only 48K is accessible 
to the user unless you disable the 
operating system, which leaves you 
with a brainless shell of plastic in- 
stead of a computer. The same goes 
for the "64K" 800XL and 1200XL 
machines. 1 refuse to pay lip service to 
Atari's and Commodore's mislead- 
ing claims for the memory capacity of 
their products. B}i the way, the 800 is 
also expandable to "64K," using 



Mosaic's adapter board. 

Your letter makes it sound as if I 
didn't say anything about the improve- 
ments found in the new !XL line, such 
as the on-board BASIC and the 
HELP key. Reread my article care- 
fully and you'll find ample praise for 
these and other new features. But 
these little bonuses are just a fresh 
coat of paint over a design that has 
remained essentially unchanged since 
1979- 

Let me conclude by denying that 1 
ever said Atari was paying Mr. Alda 
to represent anyone but himself in his 
commercials. You've taken mji "box 
of Hawkeyes" comment completely 
out of context, fust to be sure, though, 
I watched a couple of the commercials 
over again, just to be sure Alda 
wasn't wearing fatigues or a stetKe- 
scope. He isn't. The ads are easy to 
find. Atari runs them during each 
weekly episode of After 
M*A*S*H. 

— B.M. 



I am having problems running 
your programs Fill 'Er Up! and 
Livewire! on my Atari 600XL. 

I had a 400 that I made the self- 
booting tapes with, and they 
worked fine. But when I load the 
programs into my 600, it returns 
to BASIC at the end of the load. I 
would appreciate any hints you 
could give me to help with this 
problem. 

I'm very happy to see ANA- 
LOG going monthly. And 1 think 
it's the best magazine for the Atari 
on the market. 

John Merlino 

Sherburne, NY 

Try holding down both the START 
and OPTION keys together when 
you turn your computer on. The 
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START key tells your XL that you 
want to hoot a tape; the OPTION 
key says that you want to disable the 
built-in BASIC. Disk users need only 
hold down the OPTION key during 
power-up to disable BASIC. Future 
ANALOG games will include in- 
structions to this effect, starting with 
this month's Planetary Defense. 

— B.M. 

Roundup 
Joystick Button Restart 

We have been enjoying Richard 
Token's Roundup from Issue 
#13 . There is one improvement we 
would very much like to add. Can 
you tell us how to do it? 

When you have been playing 
the game from your easy chair 
(with a 12-foot cord on your joy- 
stick), it is very annoying to have 
to get up and go back to the con- 
sole to push START for a new 
game. We know how to change 
program lines so that you can push 
the TRIGGER to restart a BASIC 
program. What do you change in a 
machine language game like 
Roundup? 

We wish all game programmers 
would make a note of this: If your 
game does not require keyboard 
input, then don't make the user go 
back to the console solely to re- 
start the program. 

Carolyn Hoglin 

Orlando, Florida 

The following changes to the 
Roundup boot-maker program will 
allow you to restart the game with the 
joystick trigger: 



32 IF Pfl5S=e THEM 40 ,^ 
3* IF LINE01529 OR X<>27 
THEN 38 

35 PUT ttl,234:PUT «1 , 234 : P 
UT ttl,173:PUT «1,132:PUT « 
1,2: PUT ttl.240:PUT «1,251: 
PUT ttl,173:PUT ttl,132:PUT 
l»l,2 

36 PUT ttl,208:PUT ltl,251:K 
=43:? "PfiTCHIMG-lGOTO 39 

38 PUT ttl,BYTE 

39 NEXT X:READ CHKSUH:G0T0 
25 



Disassembler 
Update 

First off, let me congratulate 
you on your decision to go 
monthly. The long wait between 
issues is now over! 

Maurice Elliot's BASIC disas- 
sembler in ANALOG #14 is a 
very useful utility. I was always 
converting DATA statements to 
machine code by hand. Now, I 
have much more time to study the 
code, instead of looking it up. 
However, the program only allows 
output to the screen, which makes 
reading a little tedious. The few 
lines that follow, when added to 
the program, will produce a hard 
copy upon request. Studying the 
code now becomes, as Mr. Elliot 
put it, "a relaxing, armchair task." 

Ed Schembri 

Mississauga, Ontario 



30915 OPEN l»l,4,0,"K:":P0K 
E 718,8:P0KE 712,e:P0KE 75 

39817 ? CHRSC125J:? "Pleas 

e wait " 

30192 ? :? :? " DO YOU H 
ANT A PRINTOUT? (V/N)" 
30194 GET ttl,KEY:IF KEVOA 
SCC"N"> AND KEV<>A5Ct"V") 
THEN ? CHR$C2S3) :GOTO 3019 
4 

30196 IF KEY=A5CC"Y"J THEN 
PRNT=l:OPEN tt4,8,0,"P ! " ;C 
LOSE ttl:GOTO 30200 
39198 PRNT=9 
39222 ? ■'===============— 



39224 IF PRNT THEN ? lt4;"A 
DDR DEC OPN OPERAND 

DEC" 
30226 IF PRNT THEN ? tM;"= 



—T.H. 



39295 IF PRNT THEN ? 
S,0PC0DESSC3*0PNUI1-2 

um, 

30525 IF PRNT THEN ? 

30625 IF PRNT THEN ? 

$";HEX$,,OPRND 

39745 IF PRNT THEN ? 

";HEX5 

39825 IF PRNT THEN ? 

";HEXS,,OPRND 

30925 IF PRNT THEN ? 

"jHEXS;",X",OPRND 

31025 IF PRNT THEN ? 

";HEXS;",Y",0PRND 

31125 IF PRNT THEN ? 

";HEX$,OPRND 

31225 IF PRNT THEN ? 

";HEXS;",X",OPRND 

31325 IF PRNT THEN ? 

";HEX5;",Y",0PRND 

31425 IF PRNT THEN ? 

S";HEXS;"J",OPRND 

31525 IF PRNT THEN ? 

i";HEXS;",X)",OPRND 

31625 IF PRNT THEN ? 

S"jHEXSj",V)",OPRND 



tt4;PC 
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COST EFFECTIVE SOFTWARE 

BY 
"The Best Little Software House In Texas" 

HO ME BASE by soft SECTRE is a 
versalile dalabase program lor the liome, small busi- 
rress or lab In a USER FRIENDLY' MENU driven formal 
HOMEBASE ulilizes TWENTY COMMANDS CREATE, 
ADD, LIST, CLIST, CHANGE, CONCATENATE. 
SEARCH, SUM, SORT, DELETE. LABELS, LOAD, 
PRINT, SAVE, DIRECTORY, HELP, DRIVE, AUDIO, 
LOWER CASE, END An opiional SECURITY CODE 
prevenis unalhorized dala die relrieval and manipula- 
tion. Optional AUDIO FEEDBACK signals the end ol a 
command response Tlie ATARI version uses a 
MACHINE LANGUAGE SORT! 
HOMEBASE is ideal lor: MAILING LISTS (we use it 
ourselves): household, insurance and equipment IN- 
VENTORIES, MAINTENANCE schedules: a PRESCRIP- 
TION list: relurid COUPON and GROCERY lists Ready- 
lo-use data tiles lor these tasks are included Why buy 
several programs' Purchase the ONE program that will 
handle all ol your database needs HOMEBASE by 
SOFT SECTRE will SAVE you TIME and MONEY! 
SELECTRE by SOFT SECTRE is included in the disk 
based package at no additional charge (a $2995 
value!). Disk DIRECTORIES and PROGRAMS are 
loaded with numeric key input allowing even the most 
inexperienced person to easily operate the computer 
ATARI OR PET DISK 32K $49,95 
PET TAPE 16K $49 95 

Add $2 00 lor shipping, 

SOFT SECTRE 

PO BOX 1821, PLANO,TX 75074 
Send lor FREE catalog! VISA- MasterCard WELCOMED 



Machine Language 

Made EASY 

For only $39.95 

EASY is a combination of over 60 macros 
and precisely written source code which 
allows machine language to be coded with 
BASIC like commands. EASY supports IF 
THEN, DO LOOP, INTEGER MATH, I/O, 
GRAPHICS, PM GRAPHICS, FINE SCROLL- 
ING and more. 

This is ASSEMBLY code? 
10 GR 2 

20 PRINT 6, "EASY DEMO" 
30 INPUT 0, DATA 
40 COLOR DATA 
50 PLOT CX, CY 
60 DRAWTO 0, 9 

EASY comes on a disk containing libraries 
supporting AMAC® (ATARI® ) and MAC/65® 
(OSS® ) either of which are required to use 
EASY. EASY's detailed manual clearly and 
completely documents every macro command. 
Isn't it worth $39.95 to save weeks or maybe 
months on your next programming effort? 

ORDER SUPERware Dealer 

NOW! 2028 Kingshouse Rd. Inquiries 

Silver Spring, MD 20904 Invited 
(301) 236-4459 

MC, VISA, AMX, Check, M.O. accepted. 
Include $2.00 shipping, MD residents add 5% tax. 



ATARI SOf TWARE rOR THE WHOLE FAMILY 



Here are four software 
packages designed for the 
different people in your 
family. 



A BASIC 
COMPILER 
FOR THE 
PRO- 
GRAMMER 

ABC (A BASIC 
Compiler) auto- 
matically trans- 
lates Atari BASIC 
programs into 
high-performance 
integer P-code that 
runs up to 12 times 
faster! 

Perfect for devel- 
oping system soft- 
ware and commer- 
cial games, ABC accepts 
most BASIC programs (unless 
floating point dependent) with little 
or no modification. Compiled P-code 
is a self-standing DOS object module 
that is unLISTable and runs without 
the BASIC cartridge. 

ABC allows expressions in DIM, 
GOTO, GOSUB, and RESTORE state- 
ments, doesn't require you to re-order 
lines, and fully supports string and 
sub-string operations. 

Give your BASIC programs the 
look and "feel" of professional prod- 
ucts with ABC. 40K Disk $69.95. 
Manual alone $9.95 (credited toward 
compiler purchase). 

MAKEBOOT lets you create self- 
booting disk or cassette versions of 
your ABC compiled software. Re- 
duces overall program load time and 
saves memory and disk space by 
eliminating DOS. 40K Disk$t4.95. 




AN EDUCATIONAL TOY 
FOR PRE-SCHOOLERS 

Monarch is proud to present SofToy, 
an educational program smart 
enough to act simple. 

Bells ring, balls bounce, owls hoot 
as SofToy and its colorful interactive 
display gently introduce children (two 
years and older) to spatial relations, 
letters, numbers, even elementary 
programming! SofToy lets kids be- 
come familiar with computers, without 
arbitrary demands, competition, or 
intimidation. SofToy grows with chil- 
dren, too. At more difficult levels, the 
match game is a real challenge for 
the whole family 24K Disk $29.95. 



TOOLS FOR THE 
SERIOUS USER 

Power Tools I combines 
four sophisticated text 
processing tools on one 
easy-to-use utility disk. 

DIFF shows you 
differences between 
two ATASCI I text files: 
for example, changes 
you made in a pro- 
gram or document 
from one version to the 
next. 

Manually searching 
for a particular text file 
can take hours. But 
now, with SEARCH, 
you specify a search 
string and a list of files. 
SEARCH examines the 
files and points out which 
ones have that string. You'll 
"^' never lose your Fudge 

Brownie recipe again! 
CHANGE is a powerful 
search and replace utility that 
operates on multiple files with 
one command. For example, you 
could change character names 
throughout your novel with a single 
command, even if each chapter is a 
separate file. 

The special pattern-matching and 
multiple disk capabilities of SEARCH 
and CHANGE are an added plus. 

TRANSLIT lets you swap one char- 
acter set for another (for example, 
upper case for lower case) throughout 
a file with one command. 

Power Tools I is ideal for professional 
business and software development 
text applications. 40K Disk $34.95. 

Look for these fine products at your nearest ATARI 
dealer, or order direct. Include $2.00 for shipping and 
"" handling in U .S./Canada. Checks or money or- 
ders accepted. MasterCardA/isa add 3%. 
COD higher MA residents add 5% tax. 
Dealer and distributor inquiries 
invited. ATARI is a trademark 
of Atari, Inc. ABC, Makebool, 
Power Tools, and SofToy are 
trademarks of Monarch Data Systems, Inc. 




MONARCH DATA SYSTEMS 

MONARCH DATA SYSTEMS, INC., RQ Box 207, Cochituate, MA 01778 (617) 877-3457 Copyright © 1983 by Monarch Data Systems, Inc. 
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In your article about the new 
600XL computer, you asked for 
readers to let you know about 
problems. Well, here goes. I am a 
teacher at the local high school, 
and I run introductory computer 
courses for adults. We use Atari 
800s and I recommend them to 
anyone who asks. 

A friend of mine bought a 
600XL as a Christmas present for 
her grandson, and has had incred- 
ible troubles. She purchased the 
program States and Capitals for 
the child's use. However, the 
program generates an ERROR 2 
(out of memory). Repeated calls 
to the Atari hotline were fruitless; 
the line was busy all the time. 

After several hours of experi- 
mentation, we tried what we 
thought was an off-the-wall idea; 
to insert an old BASIC cartridge 
into the slot to see if this made a 
difference. It did. The program 
was able to run with no problems! 
Apparently, the program ad- 
dresses the memory of the 600XL 
differently than it would with the 
400 or 800. This also happened 
with the Atari program Scram. I 
felt very embarrassed, having 
raved about the Atari as a superior 
computer over the Commodore 
and the TI. 

One good note, though. The 
owner, in a conversation with 
another person from Atari, Inc., 
was told that she would be sent a 
BASIC cartridge at no cost, so 
that she would be able to use the 
programs. Nice touch from Atari, 
although it would have been nicer 
not to have gone through the grief. 

Just a couple of thoughts, while 
I'm here at the keyboard. First, 
congratulations on having gone 
monthly. It is terrific to now read 
your ideas and programs more 
often during the year. 

There is now a national group 
of educators who use the Atari 
computer. It is called the Atari 
Teachers Network. Dues are 
$4.00 a year. This type of 
organization is critical in helping 
to bolster Atari's growth in the 
education field. The address is: 



Atari Teachers Network 

P.O. Box 1176 

Orange, New Jersey 07051 

Finally, it is nice to see your new 
column on educational software. I 
think that it is long overdue in 
your magazine. If Dr. Griffin 
needs any help digging through 
the mountain of software he has, 
let him know that I and my 
students would be more than 
happy to field test and review 
some for him. 

Rick Paula 

Quabbin Regional High 

Barre, MA 

To The Editors: 

Alexander Leavens' comments 
on software piracy in Issue 15 
struck a chord or agreement in my 
heart. Nevertheless, no matter 
how much I might emotionally 
sympathize with his ideas, he 
offers no solutions for the pro- 
blem. I too am a software author, 
perhaps not as successful as Alex, 
since my royalties fall far short of 
paying my rent. But the problem 
of piracy is one which affects us 
all, whether we write programs or 
just use published material. 

Pirates affect the software 
industry as a whole the same way 
that any black market subverts the 
legitimate free enterprise system; 
they siphon off money which 
keeps the software business 
afloat. Like any parasite, they can 
kill their host. They might just do 
that, since the video games indust- 
ry is far from being in its prime 
anymore. 

But poor Alex rants and raves 
against the thieves and, I suppose, 
hopes to intimidate them by 
calling them immoral bad guys, 
etc., etc. That won't stop software 
thieves, believe me. 

In the Real World (which he 
often refers to), there is only one 
technique that will stop crime of 
any sort: make the risks exceed 
the likely benefits from the deed. 
So far, the only approach that has 
been tried to accomplish this is 
software security protection. It is 
normal for programmers, who 



Attention 
Atari 810 owners 

The "Chip" with Arduver/ 
Editor Software 810 
Automatic Disk Backup 
$9995 p^gj pgij 

Available soon for 1050 and Percom Drives 

Happy 810 
Enhancement 

$19995 Post Paid 

Includes Warp Drive package 

Archiver/Editor 
"Happy Version" 

Runs on Disk Drives with Happy 810 
Enhancement; makes Happy Drives 
compatible with The "Chip" 
$3995 Post Paid 

Call or write for free brochure 

Southern Software 

A division of Southern Supply Co. 

1879 Ruffner Road 

Birmingham, Alabama 35210 

Phone 205-956-0986 

Prices subject to change without notice. 



rely on the marvels of modern 
technology for their daily bread, 
to cling to a technological cure for 
the cancer of software theft. 
Unfortunately, whatever can be 
secured by Man or machine can 
also be made insecure. Protection 
schemes, like all security gim- 
micks, only delay the theft of the 
precious products. 

No security scheme can prevent 
piracy. The question is only how 
much time and effort (or fancy 
disk/cartridge disassembler 
equipment) the criminal is willing 
to invest in to beat the protection 
schemes. When you're talking 
potential profits of tens, even 
hundreds of thousands of dollars 
from purloined programs, rest 
assured that the thief is willing to 
invest quite a bit of work and 
money to get copies of a success- 
ful game. Appealing to his moral- 
ity and sense of fair play as a deter- 
rent is a joke. 

Even though I have little faith in 
government jurisdiction over any- 
thing, the only possible resolution 
seems to be legal recourse. The 
threat of a nice long jail sentence 
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and a hefty fine could do the trick. 
Unfortunately, our legal system, 
as sorry as it is anyway, is com- 
pletely and totally unprepared to 
deal with the issue of computer 
crime. Just read the legal briefs on 
the subject and you will see that 
most every successful pirate, 
when caught, is slapped on the 
wrist by the confused courts and 
thereafter becomes rich and 
famous from his or her exploits by 
writing a book or becoming a con- 
sultant. The ones that don't get 
caught remain secure in the know- 
ledge that there are no realistic 
penalties for this type of crime. 

Step number one is for authors 
and members of the software in- 
dustry to lobby for sensible copy- 
right legislation. The current 
copyright laws were OK for the 
1800s, but are totally obsolete 
today. Here is where they fail: 

a) Current laws do not go far 
enough to grant an "identity" to a 
software product. If a program 



cannot easily be distinguished 
from its copy, the law, in practice, 
does not consider them versions 
of the same original. In other 
words, if the pirate copies a pro- 
prietary product and makes a 
couple of minor changes to it, the 
courts often cannot identify the 
result as a copy and will not do so 
without a lot of expert testimony 
and expensive, drawn-out court 
proceedings to determine the 
truth. If copyright laws were 
modeled more after existing 
patent office standards, or if soft- 
ware were to be covered by patent 
laws, this problem and a few 
others would be resolved. I say let 
software be governed by patent 
laws, not by copyrights. Programs 
are "unique processes" and 
should fall under the patent um- 
brella. 

b) The law does not have any 
means to pursue pirates. At pre- 
sent, pirates can go about their 
business undetected because there 




KB 400" $89.95 

Exact Atari™ keyboard layout — Full Year Warranty 
Neiv! Speed Blaster™ rapid fire joystick add on $12.95 



l6kATR8000 $299.95 

64k ATR8000 w/CP/M .... $449.95 

OS/A+4.1 $ 49.95 

I— S^i"TandonDrive $249.95 

2-51/4" Tandon Drives .... $449.95 



8" Drives CALL 

4-Connector Drive Cable .... $35.00 

2-Connector Drive Cable .... $25.00 

8" Drive Adapter $19.95 

Parallel or Serial Cable $29.00 



TELEPHONE 

309/343-4114 

Weekdays 9am-5pm 
Saturday 9am- 1 2pm 

Central Time 

KB 400 & Speed Blaitcr 
are Trademarks of Atto-Soft 



SEND CHECK OR MONEY ORDER TO: 

flTTQ-SQfT 

832 E. Third Street 
Galesburg, Illinois 61401 



PLEASE ADD: 

$3.50 Postage & Handling 
COD — $2.00 additional 

Illinois Customers 

5% Sales Tax 

American 

Express Accepted 



Atari is a Trademark of Atari, Inc. 



is no mechanism for finding out 
whether a program is an illegiti- 
mate copy or an original. A stolen 
program runs the same as one that 
was honestly purchased. I would 
like to see laws which set a 
uniform protection standard 
(serial number recognition, etc.) 
for software and which requires 
hardware (Atari, Commodore, 
etc.) manufacturers to include 
devices that can recognize the 
difference between legal and il- 
legal software. Yes, I am calling for 
a little of Big Brother's influence 
here and, as distrustful as I am of 
technological solutions to human 
problems, I demand legally pre- 
requisite standards for security 
hardware. The stakes are Big too, 
folks! 

c) The penalties for copyright 
infringement should go beyond 
mere recompensation of lost 
income for the author/publisher, 
and set standards for severe puni- 
tive measures. Send Dirty Harry 
after the pirates. 

d) Last and most important of 
all, software authors, publishers 
and hardware manufacturers 
should join forces and lobby for 
whatever legislation will be the 
most beneficial in curbing soft- 
ware piracy. These little letters to 
the editors are nice and give vent 
to our spleen, but they do nothing 
to solve the problem. Let's go to 
Washington! 

Oh, and one more thing. The 
video recording industry is suffer- 
ing from some of the same prob- 
lems as ours. Let's keep a close eye 
on what those folks are doing, 
since they have the weight of the 
movie moguls and some very 
high-priced legal help behind 
them. The VCR folks can do a lot 
to break important legal ground 
and set precedents that we might 
want to follow. It might even be 
beneficial to join forces with the 
Big Guys. We must hang together 
or we shall surely all hang sepa- 
rately! 

Reinhard Mirkovich 
Billerica, MA 
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The Winter Consumer Electronics Show, held the 
first week of January in Las Vegas, is one of the 
industry's traditional new-product introduction 
periods. No major hardware announcements were 
made by Atari, and computer dealerships and 
Toys 'R' Us stores have yet to see most of the 
hardware exhibited last June in Chicago. Atari is 
apparently still in a regrouping stage after the 
takeover of James Morgan, the latest chairman and 
CEO. 

Hardware: Now you see it. . . 

600XL and 800XL computers have been 
shipping in quantity for several weeks now, but 
don't give up your old 800 in anticipation of a 
1400XLor 1450XLD just yet. The 1400 has been 
officially dropped from the product line. The 
1450XLD is still planned for release "sometime in 
the near future." 

Another victim of Mr. Morgan's axe is the CPM 
Module. This could have been a breakthrough 
product for advanced Atari users; hopefully some- 
one else will take the idea and put it on the market. 
One reason for the CPM Module's demise may be 
that Microsoft's MS-DOS has taken all the steam out 
of CP/M in the influential IBM PC market. 

Products touted last June that should see dealers 
shelves soon are the Light Pen, the AtariLab 
package, the XL Expansion Unit and the Atari 
Touch Tablet. The upcoming 1064 Memory 
Expander will upgrade 600XLs to 64K (48K effec- 
tive) of RAM. 

Not just fun 'n games. 

New Atari software titles include AtariMusic I 
and II and Typo Attack, an entertaining typing 
teacher originally marketed by the Atari Program 
Exchange. New "practical" programs include the 
SynApps series from Synapse Software: Syn- 
Trend, a two-stage statistics and graphics package; 
SynCalc, a VisiCalc-type spreadsheet; and SynFile, 
a database management system. All three require a 
48K disk systems and retail for $99.95 apiece. 

Registered owners of Atari's 1050 Disk Drive 
can write to Atari and obtain a free copy of their new 
DOS 3.0 high-density disk operating system, along 
with the publications Introduction To DOS 3 and 
DOS 3 Reference Manual. The address is: 



1050 Free DOS 3 Promotion 
Atari Customer Relations 
1312 Grossman Road 
P.O. Box 61657 
Sunnyvale, CA 94088 

The games. 
Mario Brothers is Atari's second Donkey Kong 
sequel, the first being Donkey Kong Jr. There are 
no gorillas in this game, just a lot of pipes and weird 
things blocking the pipes. The Legacy isn't too far- 
fetched. It takes place after a nuclear war; the sur- 
vivors must discover and destroy retaliatory enemy 
silos. Millipede is a super-Centipede with bees, 
mosquitos, inchworms and other bugs. All retail for 
$49.95. Atari and Disney are working together to 
release Captain Hook's Revenge, a two-part disk 
based game ($44.95, 32K) designed with education 
in mind. 

New from the third party. 

A few days ago ANALOG received half a dozen 
new software products from as many companies. 
These consisted of a few less-than-terrific games: 
Caverns of Callisto from ORIGIN SYSTEMS, 
Diamond Mine from ROKLAN, and Buck 
Rogers/Planet of Zoom by SEGA. But my day was 
brightened with Coloring II by KOALA (for use 
with their KoalaPad), and Operation Whirlwind 
and Lode Runner from BRODERBUND. 
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SYNAPSE adds to its list of recreational software 
with Encounter!, a Battlezone lookalike. Hard on 
its heels is Rainbow Walker, a jump-on-the-grid 
game where you maneuver a small figure, Cedrick, 
on a "rainbow surface." The dreary grey segments 
turn to brilliant colors as you leap along avoiding 
holes, fragile squares, twitching devils and a multi- 
tude of other creatures I've never heard of. Interest- 
ing scrolling and a nerve-wracking bonus level will 
keep you hopping. 




music which you have composed or typed in from 
sheet music. Also from Softsync comes Personal 
Accountant, Computer Mechanic, Model Diet 
and an arcade style game, Mothership. 




Dancin' Feats. 



i-m..^ mammao 



Encounter! 




Rainbow Walker, 

We await the release of Synapse's Dimension X, 
a dynamic graphics-oriented game; Slamball, a 
pinball game where you are the ball; Reptilian, a 
fast-action shoot 'em up; Quasimodo, in which you 
must keep clear of guards and recover jewels; Alley- 
cat, where Freddy the cat gets into all kinds of mis- 
chief; and New York City, an adventurous visit 
to the Big Apple. 

From SOFTSYNC comes Dancing Feats, an 
easy-to-learn, easy-to-use music creation program. 
Multi-colored "bar graphs" dance to the beat of 



HESWARE is releasing Gridrunner, Attack of 
the Mutant Camels (formally Gridrunner II), 
Mr. TNT, Ghost Manor/Spike's Peak, The 
Pond, Missing Links, Factory and Rootin' 
Tootin'; many of these are cartridge based. New 
educational software from CBS includes the Success 
With Math Series, which covers addition &l sub- 
traction, multiplication &L division, linear equations, 
and quadratic equations. 

TIGERSOFT's Tiger Graphics is a FORTH- 
written utility requiring 48K. It lets you put horizon- 
tal and vertical scrolling in your programs, along 
with custom display Usts (including the GTIA 
modes) and redefined character sets. Other features 
include four-color character sets, mixing bit-map 
graphics with characters, and picture-drawing. 

Other utilities in our morning mail include Mega- 
Font by XLENT SOFTWARE, which allows you to 
list programs containing special and inverse charac- 
ters, print out text files, and get graphic dumps 
of mode 7+ and 8 screens. MMG, the publisher of 
Final Flight!, has released several helpful programs, 
including RAM Test II for $29.95, Graphic Titler 
for $39.95, Payroll Package, Inventory Control, 
Data Manager, Accounts Receivable, Accounts 
Payable and General Ledger. The business titles 
list for $99.95 and require 40K of RAM and at least 
one disk drive. All support a printer, and some 
require it. Mail List ($29.95) and Form Letter 
Writer ($29.95) round out MMG's application 
series. These latter programs can interface with most 
of MMG's business packages for mailing individual 
letters. Finally, MACROTRONICS is offering a new 
32K program that can dump Atari graphics to most 
of the popular printers, including Epson, NEC 
8023A, Trendcom 200 and Centronics 739. D 
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WHAT IS 
D:CHECK/C:CHECK? 



Most program listings in ANALOG are followed by a table of numbers appearing as 
DATA statements, called "CHECKSUM DATA." These numbers are to be used in conjunc- 
tion with D:CHECK and C:CHECK, which appeared in the ANALOG Compendium and 
Issue No. 16. 

D:CHECK and C:CHECK are programs by Istvan Mohos and Tom Hudson. They are 
designed to find and correct typing errors when entering programs from the magazine. 
For those readers who do not have a copy of either article, send a pre-addressed, 
stamped, business-sized envelope to: 

D:CHECK ARTICLE 
P O BOX 23 
WORCESTER, MA 01603 



A 

ATARI 
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MAILORDER 

P.O. BOX 3354, CHERRY HILL, N.J. 08034 



ATARI 



TOLL FREE (BOO) 992-3300 



FOR ORDER 
ONLY 



FOR INFORMATION & N.J. CALL (609) 596-1234 



[ATARI HOME COMPUTERS 

Atari 600 XL CALL 

Atari 800 XL Gall 

1050 Disl( Drive Gflll 

Communicator 11.... $135 




1010Recorder '78 

1020 Printer '239 

1025 Printer «3fl5 

1027 Daisy Wheel Printer '271 
830 Modem '99 



SOFTWARE 

Atafiwrrtef '71 Tennis '3b 

Speed Reading '53 Joust '37 

Pilot '55 «s- Pac Man '35 

Assembiei Editor '07 Die t)ug '35 

.'72 Qk '35 



CX419 Bookl<eeper '195 Family Finance '36 Mickey Mouse.. 

1030 Modem 'CIILI Home FlllnE Manajer '39 Paint.. 



'37 
'35 



PRINTERS 

OKIDATA 

92 SCALL 



EPSON 

CALL 

CALL 

CALL 

S79 



RX-80 

RX-80 FT 

FX-80&FX-100. 
Printer Interface 



STAR 



'26.50 
'34.00 
'34.00 
'35.00 
'43.00 
'36.00 
'30.00 

Smith Corona.,^,.„ ,28.00 

TP2 Sfl45 I Mule '28.00 



MODEM 

Hayes 

Smart $204.95 

Smart 1200 $534.95 



Gemini lOX... 
Gemini 15X.. 



Microsoft Basic 
$61.00 
Donkey Kong 

$35.00 

Pole Position 
$36.50 



MONITORS 

AMDEK 1300) *1 54.95 I 

COLOR! $295,001 



RANA 

Disk Driue 

$CALL 



DISKS 

Elephants 

SS/SD 517.50 

SS/DD *21.00 

FujiSS/DD 520 

Verbatim SS/DD $24 

Maxell iMDlj 526 




WICO 

The Boss^l 4.95 Joystick S20.00 I 

Famotis Red Ball $25,951 

Tracl<Ball *35.95 I 



COMPUTER COVER 



Features heavy duty canvas 
with vinyl interior - waterproof. 

AJARI 800 '7.99 

AiARi aw '7.a 

EPSON MX 80 >7.J 

EPSON MX 8(ir I '7.99 

OKIDA/A /J82A.B2 '7.9! 



SURGE PROTECTOR 
UL LISTED 

6 Outlet 562.95 

4 Outlet.. 537.95 



We carry a large selection of Atari software, call for FREE catalog with order 
...or send $1 (refundable with order) UPS shipping 3% for hardware and 

$3 for software. N.J. reside nt add 6% sales tax. 



PRICES SOBJECT TO CHANGE WITHOUT NOTICE. 
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1 IBM and Okldata are lecisterBd bademarks. i 
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DRAPER PASCAL 1.5 
by Norm Draper 
DRAPER SOFTWARE 
307 Forest Grove 
Richardson, Texas 75080 
48K Disk $79.95 



by Brian Moriarty 



Despite its wide following among educators and 
professionals, the Pascal language hasn't been very 
popular with Atari programmers. Why is this? I 
think the blame lies partly with Atari itself. Their 
semi-official Pascal Language System (APX- 
20102, $49.95) requires a minimum of two disk 
drives and the patience of a saint to operate — and, 
until now, it's been the only version of Pascal avail- 
able. Small wonder that serious Atari users, many of 
whom presumably have had at least some prior 
exposure to Pascal, have turned to BASIC, FORTH 
and other languages rather than put up with the Atari 
dinosaur. 

Draper Software's Pascal 1.5 is a new and wel- 
come addition to the growing list of Atari languages. 
Designed for use with only one or more disk drives, 
the Draper system offers Atari programmers a 
chance to flex their Pascal muscles without the 
thumb-twiddling and cursing that characterize its 
predecessor. 

A Texan dialect. 

Draper Pascal is not a full implementation of 
either the ISO or UCSD standard models of the 
language. In this respect, it falls short of Atari 
Pascal, which boasts full compliance with ISO. 
Draper's shortcomings include its abbreviated 
range of data types, limitations on parameter passing 
and program structuring, a lack of built-in number 
formatting and other, more subtle points too numer- 
ous to supply in detail. 

Despite these eccentricities. Draper Pascal isn't 
likely to offend anyone familiar with more "polite" 
implementations of the language. It's close enough to 
the Real Thing to make it a perfectly legitimate tool 
for teaching and other formal applications. 

Pascal is by design a generalized language, with 
almost no direct support for machine-specific 
concepts like PEEKing and POKEing. But Atari 
programmers would be hard-pressed indeed to get 
along without some kind of interface to the hard- 
ware. Draper Pascal addresses this need by offering 
lots of machine-specific features including I/O, disk 
management, string manipulation, BASIC-type 
graphics and sound, plus a handful of functions 
for reading game controllers and generating random 
numbers. Especially naughty by academic standards 
is Draper's CALL procedure, which allows you to 
easily access your own machine-language subrou- 



tines. Listings 1 and 2 will show you what else the 
Draper vocabulary has to offer. 

Standard data types recognized by Draper Pascal 
include 8-bit CHARs, 16-bit signed INTEGERS, 
STRINGS of up to 255 characters, REAL variables 
stored in the Atari's usual 6-byte floating point 
format, one-dimensional ARRAYs of any type 
(including strings!) and a BOOLEAN flag for 
true/false testing. There's also a FILE type that is 
used by the system for handling various I/O chores. 
Subrange data types, RECORDS and pointers are 
not supported. Formal parameter passing is limited 
to INTEGER values, but you can always "pass" 
other types of values by using global variables. 
Likewise, functions can formally return only 
INTEGER values. 





Listing 1. 




Procedures, declarators and directives. 


ARRAY 


BEGIN 


BLOAD 


BOOLEAN 


CALL 


CASE 


CHAR 


CLOSE 


COLOR 


CONCAT 


CONST 


DELETE 


DOS 


DRAWTO 


DUMPSTK 


DVSTAT 


EXIT 


FILE 


FOR 


FUNCTION 


GOTOXY 


GRAPHICS 


HIMEM 


IF 


INSERT 


INTEGER 


LOCK 


MAXGRAPH NOTE 


OPEN 


OPTIONS 


PLOT 


POINT 


POKE 


PROCEDURE 


PROGRAM 


PURGE 


READLN 


REAL 


REPEAT 


RESET 


REWRITE 


SETCOLOR 


SOUND 


STATUS 


STRING 


TRACEOFF 


TRACEON 


UNLOCK 


VAR 


WAIT 


WHILE 


WRITE 


WRITELN 


XCTL 


XIO 

Listing 2. 




Functions and operators. 


ABS 


ADDR 


AND 


ARCTAN 


ASC 


CHR 


COPY 


COS 


CVTREAL 


DEG 


DIV 


EOL 


EOLN 


EXP 


EXPIO 


lORESULT 


KEYPRESS 


LENGTH 


LN 


LOCATE 


LOG 


LPENH 


LPENV 


MOD 


NOT 


ODD 


OPTIONKEY 


OR 


ORD 


PADDLE 


PEEK 


POS 


PTRIG 


RAD 


RND 


SELECTKEY 


SHL 


SHR 


SIN 


SQR 


SQRT 


STARTKEY 


STICK 


STR 


STRIG 


VAL 


= 


+ 


•r 


> 


<> 


<= 


>= 
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Pascal wouldn't be Pascal without a variety of 
program structures to choose from. Draper's system 
has most of the expected ones, including IF/THEN/ 
ELSE, FOR/TO and FOR/DOWNTO, CASE with 
a nice ELSE option, REPEAT/UNTIL and WHILE. 
There is no GOTO in Draper Pascal, and you're 
probably better off without it. Both nested pro- 
cedures and recursion are supported by the compiler. 
Forward references are not allowed. 

Checking the oil. 

Internally, the Draper system is fairly typical. 
There's an editor for composing source text, a 
compiler that translates the source into executable 
form, and a supervisor that provides run-time support 
for compiled programs. All three are supplied on a 
single copy-protected disk, along with 80 pages of 
looseleaf documentation and a registration form. 

Draper's concisely written User's Manual assumes 
prior familiarity with Pascal. It comes with a sample 
run-through that shows you how to edit, compile 
and run your Pascal programs. A system glossary 
then explains each procedure and function in detail, 
with examples and Atari BASIC equivalents when 
applicable. You'll also find the complete Pascal 
source code for Draper's Editor and Main Menu 
routines, both in printed form and on the master 
disk. Very considerate. 

The Draper editor is a modest but serviceable 
affair that lets you enter source text and edit it on a 
line-by-line basis. Single -character commands allow 
you to create new files, insert and delete individual 
lines or blocks of lines within a file, search for strings 
within a range of lines and save your files on disk for 
later editing and/or compilation. All lines must be 
referenced by an editor-supplied line number, 
although the numbers are not saved in the file 
or needed by the compiler. 

The editor's buffer will hold a maximum of 250 
eighty-character lines. This might limit the size of 
your programs were it not for an INCLUDE 
directive that supports unlimited chaining of disk 
files for compilation. The editor is also capable of 
saving and loading files from cassette. Too bad the 
compiler only accepts disk files as input. 

Draper's line editor is a little too primitive for 
my taste. Those line numbers are a nuisance, especi- 
ally when you don't have the full-screen editing of 
Atari BASIC to fall back on. I find it easier to use a 
general-purpose word processor like Text Wizard 
or AtariWriter to create my Pascal source files, 
saving Draper's line editor for interactive touch-ups 
and debugging. Just keep your lines less than eighty 
characters long, and the compiler will never know 
the difference. Note that Atari Pascal doesn't come 
with any editor at all; they expect you to buy their 
surrealistic Program-Text Editor (APX-20075, 
$39.95). In this context. Draper's line editor can be 
viewed as a handy little freebie. 



P-coding. 

Finished typing in that Pascal masterpiece? Then 
it's time to look at Draper's compiler, which con- 
verts your hours of labor into a working program 
you can be proud of. 

The Draper Pascal system employs a single pass 
pseudo-compiler. That doesn't mean it's a fake; the 
term is used to distinguish so-called true or native- 
mode compilers which generate actual machine code 
from compilers Uke Draper's which generate pseudo- 
code or p-code. P-code can be regarded as the 
"machine language" of Draper's Run-Time Super- 
visor, a machine-language program that turns your 
Atari into a virtual Pascal machine. What a mouth- 
ful! 

You must insert your original Draper Pascal disk 
in drive #1 before calling the compiler, or the copy 
protection won't let you do anything. Sigh. Once 
inside, all you have to do is specify the name of the 
Pascal source file and the name of an output file for 
the p-code. Make sure a copy of the Draper compiler 
is in drive #1, and you're off. 

You can monitor the progress of the compile on 
your screen or printer. Each line of text is displayed, 
along with a hex offset value representing the address 
of that line relative to the beginning of the program. 
This information can be used together with Draper's 
TRACE option for debugging purposes. If a compile 
error is detected, you get an error message number, a 
brief diagnosis of the problem and a little arrow that 
indicates exactly where the compiler thinks some- 
thing went wrong. Error-free compiles are rewarded 
with a table showing how many instructions and 
table entries your program is using, and the relative 
offset address of each variable. 

The design of the Draper compiler places a couple 
of potential limits on the maximum size of your 
program. First, both source and output files must 
reside on the same physical disk. This is no big 
problem if you've got two drives, especially if they 
happen to be double density (an option which is 
fully supported by the system's custom DOS). 
Complications arise if you have just one drive. 
Because a copy of the compiler must be present on 
drive # 1 in order to operate, your source and output 
files must also be able to fit on that same disk. I have 
yet to write a program that came even remotely close 
to filling a single-density disk. Nevertheless, a 
compiler that was completely memory-resident 
would certainly make things simpler. 

Second, the compiler Umits you to a maximum of 
250 "table entries" per program. One entry is 
required for each variable declaration, each 
procedure and function name and each procedure or 
function parameter. As mentioned above, the 
compiler tells you how many entries you've used at 
the end of a compile. It's hard to say how complex an 
application would have to get before you'd start 
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running out of table space. My experiments have 
never used more than a handful of entries; but I 
haven't tried anything ambitious, either. 

Fortunately, the system includes a very nice 
facility for chaining programs. Draper's XCTL 
(Transfer Control) procedure lets you automati- 
cally load and execute any compiled Pascal file under 
program control. If the specified file can't be found 
on the disk, the Supervisor will step in and ask for 
the proper disk. This feature may be just the thing 
for programs that are too big to be compiled in one 
big chunk. 

Another strong point is the ease with which you 
can create practical, ready-to-boot applications. 
Simply rename your compiled file "INIT.PCD" 
and copy it over to a fresh DOS disk along with a 
copy of the AUTORUN.SYS file containing the 
Draper Supervisor. You'll end up with a genuine 
"turnkey" package that loads and executes without 
any user intervention. Draper offers a free 5 -year 
run-time license to programmers who wish to sell 
applications written with their system. 

Performance. 

I was curious to see how Draper Pascal stacked 
up to other Atari languages in terms of speed and 
efficiency, particularly Atari Pascal. So I trotted out 
my trusty benchmarks Sieve and Screen-Fill 
(still warm from last month's Action! review — 
refer to that article for details), and threw them up 
against both the Draper and Atari compilers. 

t» Sieve benchMark in Draper Pascal #3 
PROGRAM SIEVE; 

UflR COUHT,I,K,PRII«,TIME: IHTEGERj 
FLftGS: ARRAY[819e] OF CHAR; 

BEGIN 

POKEf55S,e3; (» ftHTIC Off »} 

POKE as. 83; f» zero systei* tiners »3 

POKE C20 ji 03 ; 

t» init flag array an* COUNT »3 

COUNT:ze; 

FOR l:=0 TO 8190 DO 
FLAGS (13 '.-Li 

t« Sieve algorithn *3 

FOR I:=a TO 8198 DO 
BEGIN 

IF FLAGS f 13 THEN 
BEGIN 

PRIME: =1+1+3; 
K:rl+PRIME; 
WHILE K<=8190 DO 
BEGIN 

FLAGS CK3 :=0; 
K:=K+PRIME 
END; 
COUNT :=C0UNT+1 
END; 
END; 

t» fetch tiMer reading »3 

TIIC : =PEEK 1283 +256»PEEK C193 ; 



POKE (559, 343; (# restore screen *3 
MRITELN (COUNT, • PRIMES IN ' 3 ; 
HRITELN(TIME, ' JIFFIES'3 



END. 



Listing 3. 



Listing 3 is my Draper Pascal implementation of 
the Sieve. It requires 6551 jiffies, or about 109 
seconds, to execute on my 48K 800 system. This is 
roughly three times as fast as Atari BASIC at 
19,490 jiffies. Atari Pascal ran the same algorithm 
in only 999 jiffies, more than six times faster than 
Draper. Interesting. 

Next comes Listing 4, a Draper implementation 
of Screen- Fill. I obtained readings of 2186 jiffies for 
Draper and 653 jiffies for Atari, versus 4025 jiffies 
for BASIC. The difference isn't quite as dramatic 
here, but for raw speed there's no denying the 
superiority of the Atari system over Draper Pascal. 

(» Screen-Fill in Draper Pascal »3 

PROGRAM SCREEN-FILL; 

UAR SCREEN, I, J, TIME: INTEGER; 

BEGIN 

MAKGRAPH(243; (» set up graphics #3 
GRAPHICS (243; (* Mode 24 K3 

POKE (19, 03; (» zero systei* tiners »3 

(* fetch address of screen *3 

SCREEN : =PEEK (883 +256»PEEK (893 ; 

(« the fill loops »3 

FOR l:=0 TO 31 DO 
BEGIN 

FOR J:=0 TO 239 DO 

POKE (SCREEN + J , 2553 ; 
SCREEN :=SCREEN+240 
END; 

(» fetch tiMer reading »3 

TIME : =PEEK (283 ♦256»PEEK (193 ; 

GRAPHICS (03 ; 
WRITELNdlME, ■ JIFFIES '3 

END. 

Listing 4. 

Execution time isn't the only criteria for judging 
the performance of a compiler. By using DOS, I 
found that Draper had generated 3 sectors' worth of 
p-code for the Sieve benchmark and a scant 2 
sectors for Screen-Fill. Compare this with the 37 
sectors eaten up by Atari's Screen-Fill file, and a 
whopping 83 sectors for the Sieve! I can't begin to 
guess why Atari Pascal is so piggy with disk space; 
the documentation is silent about the inner workings 
of the system. We can surmise that Atari achieves at 
least part of their impressive speed by giving them- 
selves plenty of elbow room. 



HIGH QUALITY 
PRODUCTS AT 
AFFORDABLE PRICES 



As Easy As Falling Off . . . 

fiLOG COMPUTING 

Dealer and distributor inquiries invited. 



ADVANCED SOFTWARE 
DESIGNS FOR HOME 
COMPUTERS 



We at ALOG Computing wish to thank you for the response you 

have given us on our first product the ALOG Pagewriter. (See 

Comnnents) Now we have two other utility progranns available for 

Atari Home Computer users. We have tried to make them simple and 

fun to use. We hope you enjoy them. 

All our programs work on ATARI 400/800, 800XL, and 1200XL 

computers. 

THE ALOG PAGEWRITER 

Turns your ATARI computer and 80 column printer into a very easy to use electronic 
typewriter. Because the entire page layout is displayed while the user is typing and 
editing, the ALOG PAGEWRITER is ideal for simple word processing tasks such as 
letters,' notes, memos, or the kid's book reports and term papers. The average 
learning time is about five minutes. 

KEY FEATURES 

• Uses standard Atari editing keys (e.g. INSERT, DELETE, TAB, etc.) • A HELP screen 
with command summary • Visible and fully adjustable margins • FILL command for 
right justification • Automatic return option (with word moving) • Line 'Split' and 
'Splice' commands • Store 10 pages with no disk swapping • Not copy protected 

REQUIRED EQUIPMENT: 

• At least 32K of RAf\/l • One disk drive • 80 column printer 

THE ALOG DISPLAYMAKER 

A versatile color graphics program in Forth that you can use for making graphs, charts, 
displays or just have fun drawing pictures. 

KEY FEATURES 
Graphics Mode: • Circles, Ellipses, Rectangles • "Rubber Band" lines • Semi- 
automatic fill • Color pallette for easy variation • Zoom magnification 
Text Mode:* Three sizes of characters • Three colors • Regular ATARI character set 

• Special character set • "Built-in" character editor (gives unlimited number of 
characters) 

Disk Storage of 8 displays 
"Slide Show" display features 
Graphics dump to many dot graphics printers 
(2 sizes) — Epson*, Gemini 10, Prowriter and others. 

'requires Graphtrax option 

REQUIRED EQUIPMENT 

• At least 48K of RAM • One disk drive • Optional (joystick and graphics printer) 

THE ALOG MAILLIST 

A simple, easy to use data base program specifically designed for making and keeping 
mailing lists and printing out mailing labels. 

KEY FEATURES 

• Multilevel fast search and sort • Complete disk utility package • Split & merge files 

• Supports 1 or 2 disk drives • Prints continuous form labels 1 to 2 inches high • Uses 
standard ATARI Editing Keys • Holds 130 records in memory and 500 records per 
disk • Make your own backup copies 

REQUIRED EQUIPMENT 

• At least 32K RAM (48K recommended). • One disk drive (works fine with two) of 
any manufacture that works with ATARI DOS 2.0S • ATARI BASIC Cartridge • ATARI 
DOS 2. OS • A printer with adjustable tractor feed. 



COMMENTS 

from users of the Alog Pagewriter (used 
with written permission) 

"Great product. I wrote two pages the first time 
I sat down with it. I wish I had it a couple of 
years ago. " 

James Tanaka, Monterey Park, CA 

"Refreshingly simple but adequate word 

processor at an affordable price — good work. " 

Jay Carccarese, San Jose, CA 

"Super, lama Valforth programmer and I love 
it. " 

P.R.S., San Antonio, Texas 

"Good, simple text processor for letters — great 
to be able to back up master disk. " 

Larry Cox, Floyds Knobs, IN 

"Excellent, it makes letter writing a dream. " 
M.H., Oaktown, VA 

"Great price and easily learned. " 

Noel Brooks, Great Falls, MX 

"As I have used PAGEWRITER 1 have grown 
to love it. After using WORDSTAR and 
LETTER PERFECT a truly user kind word 
processor is a wonderful experience. " 

"One feature which I feel sets it apart from all 
others is the capability to visualize the page. 
This feature is indispensable when designing 
tables for a report. " 

"Thanks again for an excellent piece of 
software. " 

John C. Goodman, Marblehead, PA 

"Excellent for one or two pages of text. It's 
simple. " 

Richard E. Lane, Vandenberg AFB, CA 

"Very Easy to use. It's very useful for letters" 
Fiorian C. Pulver, Riverside, California 

"/ have found your product to be quite easy to 
operate and understand, both in the written 
instructions and manual operation. I have the 
ATARIWRITER and BANK STREET 
WRITER and I find myself using your product 
more than either one of these two products. " 

"I have also found that for the price of your 
product versus that of the other companies that 
your product has paid for itself twice over. " 
Edward Locke, Mentor, OH 

"Verv ea.sv to use and perfect for mv needs." 
J.B. Karluk, Throop, PA 



All programs are only $39.95 each. To order direct send check or money order to ALOG Computing, 
1040 Veronica Springs Road, Santa Barbara, CA 93105. We pay shipping. For information, credit 
card orders or C.O.D., call our distributor: COMSTAR (805) 964-4660. 

(ATARI Is a trademark of Atari, Inc.) 
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Compilation time is yet another point of interest. 
Once the programs had been fully debugged, 
Draper's single-pass compiler took no more than 
ninety seconds to produce executable programs 
from either benchmark. Atari Pascal's multi-pass 
compilation and linking required a good six to seven 
minutes for each program, including periodic disk- 
swaps and prompt-answerings. This comparison was 
made using two drives, #1 containing the system 
software, #2 the program source and output files. 

Be ye friend or foe? 

There's still one performance criteria I haven't 
covered in this report. It isn't often included in the 
high-tech comparisons they publish in B^ite and Dr. 
Dobb's Journal, but in this case I think it makes all 
the difference in the world. That criteria is Develop- 
ment Time. 

The first thing I did when I received my copy of 
Draper Pascal in the mail was to adapt and test my 
benchmarks. I'm not especially fluent in Pascal, and I 
had no prior knowledge of the system. Yet within 
half an hour of opening the User's Manual, I had a 
fully debugged version of Screen-Fill up and 



running. This brief experience allowed me to write 
Sieve in less than fifteen minutes. 

Atari Pascal was quite another matter. It took 
staff programmer Charlie Bachand and myself fully 
two hours of sweat, curses and page-turning before we 
figured out how to implement the Sieve without 
facing a compile error. The "non-standard" 
GRAPHICS calls in Screen-Fill cost us the better 
part of an afternoon. These are not exaggerations. I 
should add that Charlie is fairly well-versed in Pascal 
and has used the Atari system before, though I can't 
imagine why. 

How should the above comparisons be inter- 
preted? It's clear that Draper Pascal isn't as fast or 
"complete" as Atari's Pascal Language System, 

and it's also more expensive. But when it comes 
down to sitting in front of a keyboard and churning 
out working, usable programs in a reasonable 
amount of time. Draper's system beats the living 
daylights out of the competition. If you must have 
Pascal for your Atari, save yourself a lot of frustra- 
tion by taking a serious look at Norm Draper's long- 
overdue alternative. D 



A 

ATARI 



A LIFETIME OF DISCOVERY 
BEGINS WITH ATARI COMPUTERS 



DISK DRIVES 

RAMA 1000 CALL 

TDAK ATI (Single/Double Density] CALJ. 

IRAK ATDI {Single Density/Parailel Interface) CALL 

TT?AKATD2(Singie/[DoubleDensity/Parailelinterface) ... CALL 

ASTRA 1 620 CALL 

INDUS GT CALL 



RAM (MEMORY) BOARDS 

ATARI 1 6K 

Intec 64K Board |400| . . 
Intec 48K Board (400) . 
Intec 32K Board (400) . . . . 
Microtjits 64K |600| 



PRINTERS 

Gemini STX-80 |80 Column Thermal) S169.00 

Gemini I OX Printer (80 Column) 279.00 

Gemini 1 5 Printer ( 1 36 Column) 399.00 

Delta 10 Printer (SO Column) 499.00 

Powertype 379.00 

Radix 10 649.00 

Radix 15 769.00 

Epson RX-80 (80 Column) Dot Matrix 379.00 

Epson RX-80FT (80 Column) 469.00 

Epson FX-80 (80 Column) Dot Matrix 579.00 

Epson FX-lOO (136 Column) Dot Matrix) 749.00 

Axiom AT-IOO (80 Column) Inc. Int. Cable 229.00 

Silver-Reed EXP 500 Daisy \xmeel Printer (80 Column) 429.00 

Silver-Reed EXP 550 Daisy Wheel Printer ( 1 36 Column) 679.00 

PRINTER INTERFACE CABLES 

APE FACE S 65.00 



MPP-II50 ... 
Star Universal . 



79.00 
69JX> 



MONITORS 

Gorilla"' Hi Res 12" Non-Glare Saeen S 65.00 

Gorilla"" Hi Res 12" Non-Glare Amber Screen 99.00 

BMC Green Screen 79.00 

Sakata SCIOO Color Screen 249.00 

Monitcjr Cable 12.00 



1-800-624-7506 



S 29.00 

109.00 

66.00 

59.00 

129.00 



MC 


COMPUTER CREATIONS, Inc 




RO Box 292467 


VISA 


Dayton. Ohio 45429 




For Information Call; 


C.O.D, 


(513)294-2002 


(Add S2.50) 


(Or to order in Ohio) 



All Orders Add S3 (XI Shipping and Handling. Ohio Residents Add 6% for Sales Tax. 
ASK FOR OUR FREE CATALOG 

SENERIC DISKS 

Generic 100% Delea-Free/Guaranteed MINI-FLOPPY DISKS 



Diskettes ( I Box Win.) - 1 per box 

SS/DD DD/DD 

I or 2 Boxes 1 7,49/box 20.99/box 
3 - 9 Boxes 1 5.99/box 1 9.99/box 

lO-FBoxes 14,99/box 18,99/box 



Bulk Diskettes with Sleeves - Price per Disk 
SS/DD DD/DD 

10-29 1.59 199 

30-99 1.49 1,89 

lOO-l- 1.45 1,79 



ATARI HOME COMPUTERS 

ATARI 600XL~ Home Computer ( I6K RAM) CALL 

ATARI SOOXL" Home Computer (64K RAM) CALL 

ATARI 1 200XL'" Home Computer (64K RAM) CALL 

ATARI 1 400XL"' Home Computer (64K RAM) CAU 

ATARI 1 450XLD~ Home Computer (64K RAM) CALL 

ATARI ADDITIONAL EQUIPMENT CAU 

MODEMS 

MPP lOOOC S129.00 

Signalman Mark II Modem 79.00 

Hayes Stack Smartmodem (300 BAUD) 239.00 

Hayes Slack Smartmodem ( 1 700 BAUD) 549.00 

Novation J CAT 1 19.00 

Novation 103 Smart CAT 169.00 

Novation Auto CAT 199.00 



TURN YOUR HOME INTO THE 
HOTTEST ARCADE IN TOWN 



O'RILEY'S 
MINE™ 

You're a mad 
Irishman digging 
your way through 
an abandoned mine 
filled with oil, 
coal, gold, rubies, 
diamonds — and 
hungry creatures. 
You'll need the luck 
of the Irish to sur- 
vive, but with so 
much at stake, it's 
a chance you're 
willing to take. 




POOYAN 

One of the 
biggest arcade 
game hits from 
Konami is a game 
of fast action in 
life-and-death en- 
counters. You battle a 
pack of hungry wolves 
eager to catch your de 
fenseless piglets. You" 
need quick reflexes and 
a good arm in the new 
arcade hit from Datosoft 




POOYAN" available for Atari*, Radio 
Shock Color", Apple*, coming soon for 
Commodore 64" 



ZAXXON" 

Zaxxon has all the 
unique color graphics, 
super sound and unprece- 
dented 3-dimensional 
effects that made it the 
star of the arcades. 
Maneuver your ship 
through the state-of- 
the-art defenses of the 
floating fortress to 
come face-to-face 
with the deadly 
Zaxxon Robot. This 
is the official home 
version of the 
Segas arcade hit. 



Our reputation as one of the premier game manufacturers 

assures you of the highest quality attainable in action, strategy 

and graphics. For the hottest titles in entertainment, keep your eye on the leader— DATASOFT. 

You'll Find The Best In Home Computer Software 

from tf B ® 




ZAXXON" avoilable for Atari'", Apple"^, 
Radio Shack Color' 



Pooyan"' is a trademark of Konami Industries Company, Ltd. 

O'Riley's Mine'^^ and Datasoft® are registered trademarks 
of Dotasoft Inc. 



DaMjsoft 



9421 Winnetka Avenue, Chatsworth, CA 91311 



(213) 701-5161 



e 1983 DATASOFT INC. 
Moon Shuttle® is a registered trademark of Nichibutsu, USA. 
ZAXXON'" and Sega® are trademarks of Sega Enterprises, Inc. 

CIRCLE 150 ON READER SERVICE CARD 
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GRIFFIN'S 
LAIR 



EDUCATIONAL 

PROGRAMS 

REVIEW 





ii>. 




by Braden E. Griffin, M.D. 



This month we will look at some of the available 
educational software in the field of mathematics. 
Some of this material is primarily targeted for use 
within a school system, and may be too expensive for 
many individual users. However, since Atari systems 
may be found in a significant number of schools 
(15% by some guess-timates), and some of you may 
have input into what system or software is purchased 
in your school district, I will include these programs 
in this review. 

Unlike some other areas of education, mathe- 
matics is ideally suited for computer-assisted educa- 
tion. The answers are exact, usually do not require 
long, detailed input, and the computer can randomly 
generate problems and perform operations without 
sophisticated programming. Even a beginner can 
write a BASIC program which will provide a child 
with fundamental math drills. 

The computer's ability to generate random 
numbers within a chosen range enables one to pro- 
duce an endless stream of problems to be performed. 
Embellishing these programs with color, sound and 
unique responses ( "Molly, you turkey! ' ' ) allows per- 
sonalization of each drill. It also helps develop ele- 
mentary programming skills. 

The programs reviewed here are intended for 
intermediate (grades 3-8) and secondary school 



children. For those interested in math programs for 
children in the early elementary age group, I refer 
them to ANALOG #14 and the review of Mickey 
In The Great Outdoors in this column, and Keith 
Valenza's review of Monkeys, Math and 
Merriment. 

SUCCESS WITH MATH SERIES 
CBS SOFTWARE 
Greenwich, CT 06836 

ADD/SUB/MULT./DEV. 16K C-$19.95 D-$24.95 
LINEAR/QUADRATIC 48K C-$19.95 D-$24.95 

These four separate math tutorials for students 
from grades 1-12 are designed not only to provide 
math drill and practice in specific areas, but also to 
illustrate the step-by-step problem solving process. 
Unlike other math programs, the Success With 
Math series "works through" math problems, iden- 
tifying errors when they occur and directing the user 
to the source of the error before the next step is 
accomplished. By using this method while prompt- 
ing the student along the way, successful completion 
of every problem is achieved. At the end of each 
problem, an analysis of the errors is made. 

The program takes over as soon as it is loaded and 
instructs the user in how to proceed. Although a 
small, excellently prepared manual with program 
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descriptions is included, the program instructions 
are quite clear and thorough. 

Addition and Subtraction. 

In the "Addition" program, any size problem up 
to nine numbers (rows) by nine digits (columns) 
may be designed. After selecting the size, a randomly 
generated problem is displayed. The cursor is initially 
found resting just below the right-hand column. The 
student solves the problem as if using paper and 
pencil by entering the sum of that column. The 
cursor then positions itself at the top of the next 
column, waiting for the student to enter the "carry." 
This process continues until the problem is solved. If 
an error is made, it is immediately called out, and 
a new answer may be tried. If this second answer is 
also wrong, the correct answer for that step is shown, 
and the student then continues with the solution. 



The choice of up to three digits for the divisor in 
the "Division" section really gives the student exten- 
sive practice in long division. The cursor again posi- 
tions itself in the specific location used, as if the 
problem were being done on paper. Multiplication 
and subtraction with borrowing are used until the 
final quotient is obtained. 



42 I 448056 
3768 



429495 

752863 

876978 

♦971285 



Sorry ftiwin. 

Vour answer is incorrect. Try again. 



Multiplication or Division. 



Sorry, Ton. 

You did not enter 

Try again. 



Correct 33335' 



Addition or Subtraction. 

The "Subtraction" part of the program is similar 
to "Addition," with two exceptions. The size of the 
problem can only be up to five digits (only two 
rows, of course), and there is a choice of problems 
with or without borrowing. For borrowing, the letter 
B is entered from the keyboard. The digit to be 
borrowed from is then shown in inverse video and its 
new value is entered. 

This is a very well done program which offers the 
student practice with large numbers and the con- 
cepts of borrowing and carrying. For grades 1-4, 
random computer responses and encouragements 
are included. 

Multiplication and Division. 

For grades 2-8, this program functions much like 
the ones above. In "Multiplication," the size of the 
multiplier may be up to three digits, while the multi- 
plicand is always three digits. The multiplication 
process is carried out, and the final product is 
obtained using addition with carrying as in the pre- 
viously described program. 



3) 

4) 

5) 

er a 



Linear Equations. 

Junior High students and beyond will acquire the 
understanding and skills necessary in basic algebraic 
principles with this program. All equations are in the 
form "AX + B = C," where A, B and C are integers. 
The student then solves for X using the menu of 
rules: 

1) Add same term to both sides, 

2) Subtract same term from both sides, 
Multiply both sides by same term, 
Divide both sides by same term, 
Simplify both sides. 

After a rule is selected, the necessary information 
must be provided to complete that step; e.g., if rule 
#3 is selected, then the user is asked what term to 
multiply both sides by. If the correct term is entered, 
the equation is then shown with the multiplier on 
both sides. Then rule #5 would be selected, and one 
would be requested to enter the new left side and, 
subsequently, the new right side. 

As with all the programs in this series, user errors 
are immediately shown and explained. In this pro- 
gram, however, the user must supply the correct 
answer for each step in order for the program to 
continue. The student always succeeds in solving the 
equation. The program keeps track of both procedu- 
ral and computational errors and displays the type 
and number of each at the end of each problem. 

Quadratic Equations. 

This program is suggested for use by students in 
grades 9 to 12. Factoring, setting each factor equal to 
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zero, and solving the separate equations are emphas- 
ized here. All equations are in the form "AX^ + BX + 
C = 0." Two levels of difficulty may be selected, 
with the easier level always having the coefficient of 
the quadratic term (A) as one. A quadratic coeffi- 
cient of two or three is used in the harder level. 



BEBUm 



♦ 14K 



48 = 8 



Enter one of the following: 

l> Divide both sides by a number 

2> Factor the left side 

3> Set each factor=0 and solve 



Quadratic Equations. 

The screen is divided into three areas: the original 
equation, a work area, and a message/instruction 
area. A menu appears with the following options: 

1 ) Divide both sides by a number, 

2) Factor the left side, 

3) Set each factor equal to and solve. 
After the equation is simplified, the user enters the 

appropriate factors in the work area. If they are 
incorrect, an error message appears along with the 
product of the incorrect factors. A new pair of fac- 
tors may then be entered. If these are wrong, the 
program goes to a tutorial section, explaining in 
detail how to factor the quadratic expression. When 
the correct factors have been entered, they are set 
equal to zero. A new menu appears and each equa- 
tion is solved for X as in the "Linear Equations" 
program. The same process of error-tracking is also 
performed. 

All four of these programs are excellent. The 
explanations are comprehensive and clear, and the 
positive reinforcement is skillfully accomplished. 
My eighth grader was working with the "Linear 
Equations" program one evening before I had looked 
at it myself. I was shocked when I saw the computer 
respond with "You only made one mistake, FOOL." 
I soon found out that, at the start of each program, 
the user's name is requested . . . and my young court 
jester had rechristened himself "FOOL." All fooling 
aside, these four programs not only provide practice 
in math concepts, they actually teach them. The pro- 
ducers of these packages are right on target when 
they state "There's no greater motivation for learn- 
ing than success." 



GALAXY II MATH FACTS 

RANDOM HOUSE SCHOOL DIVISION 

400 Hahn Road 

Westminster, MD 21157 

48K Disk, $49.50 each ($174.00/set) 

As the commander of a spaceship, you must equip 
and fly your ship through uncharted regions of 
space, avoiding Black Holes, fighting Klingons, 
maneuvering dense star fields, and finally returning 
to your home base, Earth. In order to accomplish a 
specific task, answers to a variety of math facts must 
be supplied. There are six programs available in the 
Galaxy II series, offering drill and practice in an 
assortment of math concepts. 

The same game format is used in all programs. At 
the beginning of the program, the level of difficulty 
(1-6) must be selected. The response time is then 
chosen from four options, ranging from Beginner 
rank (7 seconds) to Captain (4 seconds). Players 
begin 2000 light years from Earth. The time elapsed, 
energy spent and distance from Earth are displayed 
at the top of the screen throughout the game. The 
engines must be loaded and fired to begin the return 
mission. Each of these functions requires success- 
fully answering math problems. If the answer is 
wrong or too late, a second chance is given. If the 
second response is also incorrect, the correct answer 
is supplied, and that particular function will not be 
performed. This method is also used to arm the ship 
with torpedos and space bombs. 




Galaxy II Math Facts. 

"I need more power, Scotty!" 

During the game, a player must replenish the 
ship's energy supplies. Three potential disasters are 
encountered during the mission. Approaching a 
Black Hole, a math problem appears on the screen. A 
correct answer causes the spaceship to move farther 
from the gravitational force of the Black Hole. An 
incorrect response, or unsolved problem, moves the 
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DO YOU SUBSCRIBE TO ANALOG 
COMPUTING ON DISK OR CASSETTE? 



. . .if not, then you 
should. Since issue 
1, ANALOG'S 

cassette and disk sub- 
scriptions have 
eliminated the 
need for you to 
spend hours typing 
in programs from the 
magazine. All of the 
programs in the 
magazine are on the 
cassette and disk 
versions. These 
programs are in the 
public domain, and 
are not copy- 
protected. 

1 year (12 issues) on 
cassette, $90.00, 
disk, $130.00; y2 
year (6 issues) 
cassette, $48.00, 
disk, $72.00. 








ANALOG COMPUTING 
Issue #16 



m 




^ 



JL 



To subscribe on cassette or disk, 
send check or money order to: 

CASSETTE SUBSCRIPTION 

or 

DISK SUBSCRIPTION 

P.O. BOX 615 
HOLMES, PA 19043 

For Fastest Service, 

Call Our Toil-Free 

US Order Line 

800-345-8112 

In Pennsylvania call 800-662-2444 
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ship closer to it. If the ship is pulled into the Black 
Hole, it is destroyed, and the game ends. Similarly, 
correct responses enable one to fight Klingons and 
avoid destruction in a star field. After avoiding all 
hazards, the final destination is reached and the flight 
time is displayed. The goal is to record the fastest 
flight time possible. It is not a simple task to reach 
Earth. Even if every problem is correctly solved, 
some gamesmanship skills are required. 



.VJ-Wl 




Galaxy II Math Facts. 

Basic Facts. 

The first of the six programs in the series provides 
a drill in automatically recalling the basic facts com- 
monly mastered in the first through the fourth 
grades. "Basic Facts" offers six levels of progress, 
from addition and subtraction to multiplication and 
division, and uses number facts from 0-5 up to 0-12. 

Place Value. 

Here the student must identify the position or 
place value of a digit within a given number. The 
numbers range from hundred thousands to thou- 
sandths. The recommended grade level for this pro- 
gram is from 1-6. 

Fractions I and II. 

These programs are presented on two disks. They 
include the concepts of comparing fractions, simpli- 
fying fractions, changing improper fractions to mixed 
numbers and vice versa, and performing basic math 
operations that use fractions. In "Fractions I," a true 
(T) or false (F) response is required. In "Fractions 
II," the numerator and denominator are sequentially 
entered. Fourth through sixth grade level is necessary 
to use these programs. 

Rounding and Estimating. 

The first three levels of this program require the 
student to round numbers ranging from thousandths 
to thousands. The last three levels stress estimation 
of the sum or difference of two numbers. Recom- 
mended grade level is 3-6. 



Decimals. 

Frequendy a difficult concept for some students, 
this section provides drills in comparing decimals, 
changing from percentages to decimals and vice 
versa, and solving problems containing decimals. 
Fifth through seventh graders will benefit from this 
very well done program. 

Integers. 

Emphasis on the properties of integers for stu- 
dents in grades six through eight is found here. The 
four basic math operations are used as a foundation 
for students before they advance to algebra, e.g., 
-6<-4 (T or F) or -42/7 = ?. 

Galaxy II Math Facts is not designed to teach 
concepts, but to provide drill and practice in the 
different concepts. It does this quite well. The game 
format and graphic displays make for an enjoyable 
educational experience. An excellent manual is 
included. The programs may be purchased individu- 
ally or in a package at reduced cost. 

SURVIVAL MATH 

SUNBURST COMMUNICATIONS, Inc. 

Pleasantville, NY 10570 

16K Disk $50.00 

Survival Math sounds like a cutesy arcade-style 
game where one shoots down invading aliens by 
answering math problems. Wrong again, Pythagoras- 
breath. This is the most practical, realistic and func 
tional educational software package for the devel- 
opment of mathematical skills I have seen. There are 
no fancy graphics. The straight-forward text format 
is all that is necessary for this set of programs, 
designed for students in grades 7-12. Any student 
who successfully manages these four simulations will 
be well prepared for the outside world. 

Travel Agent Contest. 

Given a limit for expenses, a seven-day and 
six-night trip to Lake Geneva is to be arranged. One 
must try to come as close to this limit as possible 
without exceeding it. Expenses for travel, food, lodg- 
ing and entertainment must be taken into account. 
As each expense category is selected, several options 
are given. One may decide to travel by plane, bus or 
train. It is more expensive to travel by plane, but 
money can be saved on meals during travel if it is 
selected. One-way fares are provided and, after mak- 
ing a choice, the cost of the round trip must be 
calculated. If the figure entered is incorrect, it is 
noted to be either too high or too low, and the total 
cost is again requested. When the exact cost is 
entered, the next expense category is planned. 

In each category, a number of options is available. 
Just like in the real world, one may go "first class" 
and stay in a posh hotel, but then may have to eat at 

(Continued on page 29) 



Turn your Atari 
into a Ferrari. 



Introducing the all-new 1984 Indus GT™ disk 
drive. The most advanced, most complete, most 
handsome disk drive in the world. 

A flick of its "Power" switch can turn your Atari 
into a Ferrari. 

Looks like a F\errari. 

The Indus GT is only 2.65" high. But under its 
front-loading front end is slimline engineering 
with a distinctive European-Gran flair. 

Touch its LED-litCommandPost™ function con- 
trol AccuTouch™ buttons. Marvel at how respon- 
sive it makes every Atari home computer. 

Drives like a Rolls. 

Nestled into its soundproofed chassis is the 
quietest and most powerful disk drive power sys- 
tem money can buy At top speed, it's virtually 
unbearable. Whisper quiet. 

Flat out, the GT will drive your Atari track-to- 
track 0-39 in less than one second. And when 
you shift into Synch roMesh DataTransfer,™ you'll 
increase your Atari's baud rate an incredible 
400%. (Faster than any other Atari system drive.) 

And, included as standard equipment, each 
comes with the exclusive 
GT DrivingSystem™ of 



software programs. World-class word processing 
is a breeze with the GT Estate WordProcessor.™ 
And your dealer will describe the two additional 
programs that allow GT owners to accelerate their 
computer driving skills. 

Also, the 1984 Indus GT is covered with the GT 
PortaCase™ A stylish case that conveniently dou- 
bles as a 80-disk storage file. 

Parks like a Beetie. 

The GT's small, sleek, condensed size makes it 
easy to park. 

And its low $449 price makes it easy to buy. 

So see and test drive the incredible new 1984 
Indus GT at your nearest 
computer dealer soon. 

The drive will be 
well worth it. 



INDUS 




The all-new 1984 Indus GT Disk Drive. 

The most advanced, most handsome disk drive in the world. 




For addilional information, call l-aO()-:i3-INDUS. In California, call 1-800-54-INDUS. 213/882-9600. 

© 1983 Induii Systems 9304 Dec-ring Avenue, Chatsvvorth. CA 9131 1. The Indus GT is a product of Indus Systems. Atari is a registered trademark ol Alan, Inc. 



IF YOU HAVE THE MARI. 
WE HAVE THE PRINTERS 



GP-700Ar 

FuU Color Printer - $599. 

COLOR - is the big feature of 
our GP-700AT Atari direct-connect 
printer. It's fast, quiet and the bright 
colors will make any presentation 
come alive. We provide cable and 
screen dump programs to eliminate 
any installation problems. 850 inter- 
face is NOT required, even if you 
daisy-chain a disk drive or cassette 
recorder. You can print, plot and 
screen dump in 25 colors with 
Axiom's GP-700AT 

GP-550Ar 

Dual Mode Printer - $399. 

QUALITY - is the keynote in our 
near letter quality mode with a 
density normally costing twice as 
much. You get friction, fully adjustable 
tractors, and even bottom feed for 
label printing. 850 interface is NOT 
required. We supply cable, manual 
and screen dump programs to get 
you off to a flying start. You can even 
daisy-chain a disk drive or cassette 



with the GP-IOOAT Atari direct- 
connect printer. 

GP-ioOiVr 

Economical Printer - $299. 

COST — is small but features are 
many. You get graphics and adjust- 
able tractors. Uses full size standard 
fan-fold paper Just take it home, plug 
it in and you'll be printing in minutes. 
The GP-IOOAT Atari direct-connect 
printer comes with screen dump to 
provide spectacular graphics, and 
you can daisy-chain other periph- 
erals. Again, NO 850 interface is 
required. 

AT-WORDSTORE 
Printer Buffer - $299, 

EFFICIENCY - is what you get with 
our 32 K printer buffer. Features in- 
clude pause and copy WORDSTORE 
can be connected to Atari computers 
WITHOUT an 850 interface. Other 



peripherals can be daisy-chained. 
Accepts any Centronics-parallel 
input printer. Two year warranty. Best 
of all, WORDSTORE is priced well 
below other printer buffers. 

Ar'S46 

Expansion Interface — $99. 

SIMPLICITY - it's just like Atari's 850 
interface, but without the four funny 
serial ports. Great for interfacing any 
parallel printer to your Atari com- 
puter. Can daisy-chain other periph- 
erals, too. By the way, if you think up a 
name for this product, drop us a line. 
If we use it, we'll send you a color 
printer free. Contest ends 12-31-83. 



AXIOM CORPORATION 

1014 Griswold Avenue 

San Fernando, CA 91340 

(2.13) 365-9521 • TWX: 910-496 1746 




Expansion Inteiface' 



CP-IOOAT 
Economical Printer 




CP-550AT 
Dual Mode Printer 



T- WORDSTORE 
Printer Buffer 



■w^\ 



GP-Series Printers 

Built for 

Lasting Quality 

by SEIKOSHA. 
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the supermarket. If there is enough money, special 
events may be attended with or without a friend. 
Now, who wants to go to a ball game alone? 
It should take about five to ten minutes to prepare 
a plan. The basic math skills required include work- 
ing with money /decimals and estimation. Besides 
the computational skills, this program provides stu- 
dents with practice in planning a course of action 
within a budget. Each time the program is run, the 
maximum expense allowed is different, as are the 
costs of the various options within each expense 
category. 

Smart Shopper Marathon. 

Remember the supermarket contests where a 
woman with a shopping cart was given ten minutes to 
fill it with free groceries? This program recreates that 
scenario with a few exceptions. There are five aisles 
in this supermarket, each with twenty-five displays. 
At the beginning of each aisle, a set of instructions is 
given. The correct choice must be made at each 
display based on these instructions. Unlike the other 
three programs in this series, this one has a time 
limit. One is given sixty clock ticks for each aisle. If 
an incorrect response is made, ten ticks are deducted. 
One point is scored for each correct answer, and a 
5-point bonus is awarded for completing all 25 
questions. 



selecting the item with the larger percent savings, and 
deciding which items have the lower total price are 
the objectives in the other three aisles. The order of 
the aisles changes with each new run. The item prices 
also vary, but they are always in a realistic price 
range. 

Careful estimates — not exact computations — 
are stressed in "Marathon." Both speed and accu- 
racy are important since, if every item price is calcu- 
lated, the student will not have as many opportunities 
to score points. Comparison shopping is frequently 
encouraged; the number of individuals who lack 
experience in this skill is amazing. 

Hot Dog Stand. 

This program is so realistic that a friend of ours 
wanted everybody responsible for the local Little 
League concession stand to practice it before next 
season. The student begins with $200 and must pur- 
chase hot dogs, buns, chips, soda and courtesy kits 
(napkins, ketchup, etc.) for their stand for an 8-game 
football season. Before each game, the prices of the 
items are set. The object is to earn $2,500 by the end 
of the season. 

(continued on next page) 



AI5LE Its 



At each display in this aisle, take 
the iteB that has the lower total 
price. 

YOU May see: 

l> 4 at «.24 each - bubble sum 
; (total prices .96> 

I 2> 2 at $.47 each - bubble suit 
ctotal prices .94J 

vou Should choose the 2 at, $.47 on 
line 2. YOU May stay in this aisle 
for ee clock ticks. 



iPress the B-ke« to beain. i 



Smart Shppper Marathon. 

A different math skill is required in each aisle. For 
example, one may be required to pick the item with 
the lower unit price. Two items are described: 1 ) Pay 
$0.60 for two bars of soap; 2) Pay $1.10 for three 
bars of soap. The #1 key would be pressed here, and 
the next display would be described. In this example, 
skill in estimation of division of a decimal by a whole 
nun\ber is required. Estimation of the product of 
two whole numbers is used when determining the 
greater total weight of two items in another aisle. 
Calculating the bigger dollar savings of two items, 



EPSON*, NEC, PROWRITER*, GEMINI*, OKIDATA 92* 
OKIDATA 82A/OKIGRAPH, M-T SPIRIT, DMP-80, PANASONIC KXP-1070 




The only self-booting giafix handler for dumps in horizontal formal 

— all mach. lang. — Lister incl. — all modes — mixed modes — 
change aspect ratios, etc. while running other programs — assem ed 

— basic or no cartridge — demos, utilities, fonts, included — dump, 
create forms, stationery, calendars, requires interface. *29.95 

B diskwiz-ll Q 

Now for single/double density. Repair, explore, alter, duplicate, 
map, speedcheck, bad sector (810), block move, trace, special print 
capabilities, disassembler, new speed, new ease, new functions, 
special printing functions, excellent repair tool w/instr. — even better 
than before! The best repair/editor/duplicator at any price — still at 

the lowest price. lUpdales avail, for a small Iff.) *29.95 

1st Class Postage Paid 

California Residents add 6%, Foreign Orders add $2.50 

C.O.D. add $3.00 - No credit cards 

Prices subject to change 

(213) 376-4105 



IVI, 



'*-^'-^ P.O. Box 2205 

ACROWARE Redondo Beach, CA 90278 

/nc/;(;jfe.s Jraclemari< of non-reialed company 
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In order to make this simulation more realistic, a 
number of variables exist. The stands can only hold 
one thousand fans. Obviously, the crowd size has a 
direct bearing on sales. The weather affects crowd 
size and consumption (more soda will be sold on a 
sunny day). A weather forecast is given; however, the 
actual weather at game time may vary. Other factors 
which may alter the crowd size include the type of 
game (homecomings attract the biggest crowds), 
time of day, and day of the week (Saturday crowds 
are larger). Hot dogs cannot be sold without buns, so 
the purchase of these two items should always 
match. If there is an inadequate supply of courtesy 
kits, the sale of hot dogs decreases. Chips, soda and 
kits do not spoil, but any hot dogs and buns not sold 
each week are lost. There is also a choice in the 
quality; inexpensive, low quality hot dogs do not sell 
as well. 



Vour stand sold: 

68 hot dogs at Sl.ee = 
24 cans of soda at $e.S0 = 
20 bags of chips at SO, SO = 



68.88 
12.88 
10.88 



$ 90.80 



Bank balance was $ 4.24 
Hew bank balance is S94.24 



Press RETURN to continue, 



Hot Dog Stand. 



Pricing is very important. Not too many people 
will buy $2.50 hot dogs, and a shirtless concession- 
aire is the result of $0.10 bargain-priced dogs. Unit 
pricing varies, and it is probably wise to stock up on 
certain non-perishable items early in the year. 

Each time the program runs, the football schedule 
and other variables differ. After each game, the sales 
figures for each item, the total sales, and the new 
bank balance are shown. This simulation provides 
students with practice in unit pricing, price setting, 
inventory assessment and dealing with the concepts 
of profit and loss. Sounds like important stuff to me. 

Foreman's Assistant. 

In order to build a playroom, six different jobs 
must be completed. The object of this program is to 
successfully estimate the amount of materials required 
for each. There is a $50 limit on unused materials. 
Also, the entire job must be completed within thirty 
days. If an unacceptable materials estimate is made 
(too little material, for example), more days are 



required to finish the project. After each task is 
described, the total amount and cost of the materials 
must be calculated. 

The tasks faced in this project are very realistic. 
The dimensions of the playroom are given. One 
must calculate the necessary number of vertical sup- 
ports, 4-by-8 wall panels, bricks to cover one wall 
(dimensions given for each brick), and gallons of 
paint to give the room two coats. The number of feet 
of shelf stock required to build bookshelves on one 
wall must be computed. Finally, the floor is to be 
covered with 9-inch tiles. 

This is the most difficult of the four programs, and 
a calculator might come in handy. Along with the 
obvious math skills required, "Foreman's Assistant" 
provides practice with conversion of measurments. 
It is suggested that students complete their estimates 
using their own methods and that established formu- 
lae not be provided. Most students apparently use a 
variety of techniques without generation of a formula. 

In summary, the four simulations in Survival 
Math are truly educational. The fundamental math 
skills we expect our children to learn can all be found 
in this package. Challenging and realistic, I highly 
recommend Survival Math. 

WHOLE NUMBERS 

PLATO EDUCATIONAL SOFTWARE 

P.O. Box 261127 

San Diego, CA 92126 

48K Disk $60.00 

Using the format of the pinball game. Whole 
Numbers provides intermediate-grade level stu- 
dents with drills in the four basic arithmetic opera- 
tions which are both fun and challenging. Four 
bumpers are displayed on the screen, each contain- 
ing a randomly generated problem. As one begins the 
game, an animated ball moves about the screen. 
When the ball touches a bumper, the answer to its 
enclosed problem must be typed in. There are five 
rounds per game, the first four dealing separately 
with addition, subtraction, multiplication, and divi- 
sion. The fifth and final round presents a mixture of 
problems from the first four groups. 

The student's goal is to accumulate points, which 
are awarded for correct answers. Each bumper has a 
different point value and as each round progresses, 
the time allotted for a response becomes shorter and 
shorter. After each correct response, the ball ran- 
domly moves to another bumper, and a new problem 
is written inside. If the correct answer is not supplied 
within three attempts, or before the time runs out, 
that particular bumper ceases to function for that 
round. If three of the four bumpers are turned off, 
the ball exits the screen and the next round begins. 

Quick responses are necessary to continue amass- 
ing points in each round. Eventually, the time limit 



becomes so short that it is impossible to enter the 
answer. A running point total is shown at the top of 
the screen, and after the last round, if the cumulative 
point total is one of the ten highest, the student's 
score and his or her initials are entered into a Hall of 
Fame. 




Whole Numbers. 

Whole Numbers drills students in the basic 
number facts from to 10. It is designed to improve 
a student's basic arithmetic skills by stressing speed 
and accuracy. The final round gives practice in dis- 
tinguishing between the operations. Competition 
with other students, or just trying to improve one's 
own score, makes each game exciting. The accom- 
panying manual includes a section on teaching 
strategies and different activities for individual or 
group use. Entries into the Hall of Fame may be 
deleted selectively by using a password found in the 
manual. This option is particularly useful if one 
individual is dominating the high scores, or at the 
beginning of a new class. 

A fast-paced and challenging approach to arith- 
metic drills. Whole Numbers is equally appro- 
priate for use in the home or classroom. D 

Educational Programs for — 

ATARI • VIC 20 

Tl 99/4A • TRS-80 CoCo 

COMMODORE 64 • MC-10 

only 4t700 

SAT Preparation, 
Alphabet, Algebra, Physics 
^ACC-f ^^^ many others! 
Programs on Disk (Tl 99/4A & Com. 64) 

Request FREE Catalog: 

moses 

Engineering 



per 
cassette 



P.O. Box 11038 
Huntsville, AL 35805 



(205) 837-3356 



RENT 



ATARI 



BUY 



EXCITEMENT 



INDUS 
DISK DRIVES 
$349/$60 Mo. 



400/800/810 

Htiavy Duty Dust 

Covers - $3.49 



NEW& EXCITING 

Ultima (D) $49 

Asylum (D) $29 

Pogo Joe (D) $29 

Danger Ranger (D) $29 

Dunzhin (C/D) $27 

Kaiv(C/D) $27 

Wylde (C/D) $27 

Heracles (C/D) $33 

Beneath Apple Manor (C/D). $30 



SPECIALS 

Sell Rent 
EPYX 

Armor Assault (D) SI 4 $5 

Crypt of Undead (D) $ 9 $5 

King Arthurs Heir (D) $ 9 $5 

Nightmare (D) $12 $5 

Temple of Apshai (D) $16 $5 
DATASOFT 

Graphic Master (D) $15 $5 

Micro Painter (D) $15 $5 

Shooting Arcade (C/D) $12 $5 

Canyon Climber (C/D) $12 $5 
SYNAPSE 

Shamus (C/D) $12 $5 

Protector II (C/D) $11 $5 

Nautilus (C/D) $11 $5 

Dodge Racer (C/D) $ 9 $5 
100's more as low as $3.49 



Call toll-free outside Texas: 1-800—433-2938 
- Inside Texas call: 817-292-7396 

WEDGWOOD RENTAL 

5316 Woodway Drive 
Fort Worth, Texas 76133 



fASt!> 
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A 

BINARY FILE 

MENU/LOADER 



32K Disk 



by Richard J. Kalagher 



More and more programs for the Atari are being 
written in machine language. ANALOG in par- 
ticular has been a leader, publishing many games 
and utilities in the Atari's mother tongue. Machine 
language programs run much faster and, in general, 
the games are much smoother and playable. The only 
nuisance is loading a machine language program. 
First you must boot DOS, then type "L" and press 
RETURN, then type the name of the file (spelling it 
right) and press RETURN. Children, especially, find 
this complicated to remember. 

When the Atari was first released, most of the 
programs were written in BASIC. To make loading 
these BASIC programs easier, many self-booting 
menu programs were written. The user just had to 
boot the disk and press a letter or number from a 
menu in order to load and run the program. 

The program described in this article does the 
same thing for machine language programs. To use it, 
create an AUTORUN.SYS file by typing in and 
running the BASIC program. The file will auto- 
matically be created. You can also type in the 
assembly language program and use an assembler 
to create the file. 

Now, just transfer the AUTORUN.SYS file to 
your disks which contain binary load files. You can 
erase the DURSYS file but you need the DOS.SYS 
file. When the disk boots, the menu will list up to 26 
files on the disk, omitting any with a "SYS" 
extension. Any other extension will be ignored. 
Thus you should not put two files with the same 
name and a different extension on the same disk. 
Also, no checks are made to see if the file is a valid 
binary load file. You should make sure the file will 



load from DOS with the "L" option before 
transferring it to your menu disk. 

To load and run a binary load program, just press 
the letter corresponding to the program you want. 
The program should load and execute. In a very few 
cases, the program may not load properly. This is 
usually due to the program overwriting the loading 
routine. If you have the assembler version of the 
program, try assembling the program at a different 
origin. 

The program itself is straightforward. I try to write 
assembly programs in a series of short subroutines. 
This makes it much easier to follow the code and 
helps in changing and debugging. The subroutine 
calls between lines 420 and 680 constitute the main 
program. If you understand how to call the Atari 
operating system and how binary files are formatted, 
you should have no trouble following the code and 
adapting it to your own needs. Also notice that the 
code is somewhat backwards. The subroutines to 
load a file are first, followed by the subroutines to 
display the menu. I did this because some programs 
will overwrite the latter portion of the code, which 
will not cause a problem since this code is not needed 
for the loading process. 

Finally, I could have used the loader in DOS or at 
least copied the code. There are two reasons I didn't, 
however. First, the loading routine is independent of 
any changes in DOS. Second, I did not have a copy of 
the DOS code at the time I wrote the program. I also 
learned a lot more by doing it myself. D 

(Listing starts on p. }4.) 
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VERY LOW PRICES GET YOUR ATTENTION 
VERY GOOD SERVICE KEEPS IT 



ATRCEWE NOT ONLY PROVIDE OUR PATRONS WITH LOW PRICES. WE BACK THEM WITH 
SUPPORT! ! I FACTORY AUTHORIZED SERVICE CENTER SUPPORT FOR OVER TWENTY DIFFERENT 
BRANDS OF HOME ELECTRONICS INCLUDING . . . ATARI, FOURTH DIMENSION MICRO-SCI SANYO 
FRANKLIN.PANASONIC AND U.S. PIONEER. APPLE WARRANTY SERVICE AVAILABLE 



FACTORY AUTHORIZED SERVICE COMBINED WITH PRICES LIKE THESE: 



ATARI HARDWARE 
LIST 
600XL COMPUTER . . . $199 
800XL COMPUTER . . . $299 
1400XL COMPUTER . . $599 
1450XL COMPUTER . . $999 

1010 RECORDER $100 

810 DISK DRIVE $599 

850 INTERFACE $219 

1020 PRINTER $299 

1025 PRINTER $549 



MONITORS 
ROE GREEN SCREEN 

$CALL BMC 12" $89 

$CALL ZENITH 12" $99 

$CALL SANYO 12" $205 

$CALL BLACKS. WHITE 

$75 SANYO 9" $145 

$429 SANYO 12" $189 

$165 AMBER SCREEN 

$239 ZENITH 12" $115 

$439 AMDEK 12" $179 



PRINTERS 
STAR MICRONICS 

GEMINI 10 $CALL 

GEMINI 15 $CALL 

MODEMS 
HAYES SMARTMODEM 300 . . $209 

MICROBITS MPP 1000 $169 

INTERFACES 
MICROBITS MPP 1100 $89 

DISK DRIVES 
RANA $319 



RCE COMMANDER 2400 
SPECI F Y 400 or 800 version 

2400 1 $199 

2400 -2 $169 

OUR PRICES ARE 

ALWAYS GOING 

DOWN 

CALL FOR LATEST 

REDUCED PRICE 



SEND FOR ROE'S FREE ATARI HARDWARE AND SOFTWARE CATALOG 
WE ALSO CARRY A FULL LINE OFAPPLE/FRANKLIN AND IBM COMPATIBLE SOFTWARE!! 




RCE 



ORDER TOLL-FREE 

800-547-2492 

IN OREGON: (503)479-4711 
RALSTON CLEARWATERS ELECTRONICS 
536 N.E. 'E' STREET GRANTS PASS, OR 97526 
ALL BRANDS ARE REGISTERED TRADE MARKS 
FOR CUSTOMER SERVICE CALL: (503)479-4711 or (503)479-4150 



TERMS: 

SHIPPING: Add 6* of loi, 

or any special arnnHemenl 
PAYMENT: Cashler'i checks, cerlified chi 
Visa A Master Charge accepied. Allow 20 da 
REFUNDS: 10% reitQckiiij charge on all rel 
GUARANTEE: All producls with full manu 
We have full repair and service facililics for a 
Apple trained and certified 



fight on Iheif benches ai (5031 479-4150. 

REPAIRS: Call for details on quality guara 

We tiave been repairing etectror 



I for UPS brown (ground) or 9% for UPS blue (air). Parcel Post, 

shipping charge ■ J6.00 

money orders, and bank wires honored immedialely. 
for personal checks to clear. 

ns or exchanges. No refunds on opened software. Call f ir5 
:iurer's warranty. Sanyo and Apple warranty available, 
electronic repairs with HP, Dynascan, Pioneer, Sanyo and 
y technical service call them for insiant advice or questioi 



eed diK 
equipm 



;nl for 12 yei 



:ondiI 



aning si 



^24^ 

'HOUR\ 

'SHIPPING^ 



BACKUP HARDWARE & SOFTWARE 



THE HAPPY™ 810 ENHANCEMENT KIT 
WITH WARP SPEED SOFTWARE 

BACK UP ANY ATARI™ DISK 



'24^ 

'HOURN 

'SHIPPiNG"* 



RIGHT-WRITE 

This device will allow you 
to write to side 2 of any 
disk. Install this box to your 
Atari'" 810 disk drive in 5 
minutes. Just plug in one 
cable — no cutting or sol- 
dering required. 

Push the button and a red 
led will light, allowing you 
to write a disk without 
notching out a hole in the 
disc. 

Easy plug-in installation 
instructions included. 

Fully tested and assembled. 



ONLY 



$2495 



CALL FOR SPECIAL LOW PRICE 

THE FILE SENDER 

Modem Program. At last, a 
user friendly program that will 
send and receive basic and bi- 
nary V\\es up to 200 sectors long 
and download them to your disk 
drive. 

The only Modem Program you 
will ever need or want 
Special features the others don't 
have: 
1)See disk directory in 
terminal mode 

2) Send and receive Binary files 

3) Save text files to disk 

4) Very user friendly 

This program comes on disk 
and will work with any Modem 
that uses the Atari'" 850 inter- 
face. 
Excellent documentation sup- 

SPECIAL 5p KXI "t) 



NOW AVAILABLE 
THE ULTIMATE BOOK 

On copyguarding. Master code/ 
cracker reveals all. Hardware 
and software tricks. Informative 
book and disk with examples 
and programs. 



ALL FOR 



$2495 



THE TRANSFER PACK 

1) Disk file to tape 

2) Boot tape to disk file 

3) Tape to tape 

Very powerful and low priced. 

ALLS 
FOR ONLY 



$2495 



We are working on new products 

and software. 

For information call (516) 588- 

6019. 

Add $5 for Shipping & Handling. 



PHONE ORDERS; 

(516) 467-1866 

PRODUCTINFO: 

(516) 588-6019 



GARDNER COMPUTING COMPANY 

P.O. BOX 388, HOLBROOK, N.Y. 11741 



We accept COD. orders, 
money orders and ship with- 
in 24 hours. 

(Personal checks will have 
to clear before shipping.) 
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BASIC Listing. 

leO REM BINARY FILE HENU/LOADER 

lie REM BASIC PROGRAM TO CREATE 

120 REM AN AUT0RUN.5YS FILE 

130 REM LOADING AT $1DFC 

140 REM 

150 REM BY RICHARD J. KALAGHER 

160 OPEN ttl,8,e,"D:AUT0RUN.SYS" 

180 DIM A CIO): TRAP 270 

190 FOR N=ieOO TO 1800 STEP 10 

280 PRINT "READING LINE ";N:FOR J=l TO 

10 
210 READ K:AtJJ=X:TOT=TOT+K 
220 NEXT J 

230 READ K:IF XOTOT THEN 270 
240 FOR J=l TO 10: PUT ttl,ACJ) :NEKT J 
250 NEXT N 
260 END 

270 PRINT "ERROR IN LINE ";N:END 
1000 DATA 255,255,124,29,255,29,32,224 
,30,32,1265 

1010 DATA 37,31,32,224,29,32,193,30,48 
,6,1927 
1020 DATA 32,85,31,76,133,29,32,187,31 

32 2595 
1030 DATA 182,30,32,177,30,32,148,32,3 
2,246,3536 

1040 DATA 31,32,115,32,32,177,30,32,61 
,32,4110 

1050 DATA 32,21,30,32,78,30,32,213,29, 
32,4639 

1060 DATA 147,30,32,125,30,32,78,30,32 
,136,5311 

1070 DATA 30,32,98,30,32,165,30,48,9,3 
2,5817 

1080 DATA 203,29,76,171,29,108,226,2,3 
2,182,6875 

1090 DATA 30,108,224,2,96,169,212,141, 
226,2,8085 

1100 DATA 169,29,141,227,2,96,162,32,1 
69,3,9115 

1110 DATA 157,66,3,169,6,157,74,3,169, 
250,10169 

1120 DATA 157,68,3,169,29,157,69,3,32, 
86,10942 

1130 DATA 228,96,68,49,58,42,46,42,18, 
30,11619 

1140 DATA 158,32,155,0,0,162,32,169,3, 
157,12487 

1150 DATA 66,3,169,0,157,68,3,169,30,1 
57,13309 

1160 DATA 69,3,169,4,157,74,3,32,86,22 
8,14134 

1170 DATA 96,162,32,169,7,157,66,3,165 
,192,15183 

1180 DATA 157,68,3,165,193,157,69,3,16 
5,198,16361 

1190 DATA 157,72,3,165,199,157,73,3,32 
,86,17308 

1200 DATA 228,96,169,19,133,192,169,30 
,133,193,18670 

1210 DATA 169,2,133,198,169,0,133,199, 
32,47,19752 

1220 DATA 30,96,165,196,56,229,194,133 
,198,165,21214 

1230 DATA 197,229,195,133,199,24,165,1 
98,105,1,22660 

1240 DATA 133,198,165,199,105,0,133,19 
9,96,173,24061 

1250 DATA 19,30,133,194,173,20,30,133, 
195,96,25084 

1260 DATA 173,19,30,133,196,173,20,30, 
133,197,26188 

1270 DATA 96,174,19,30,232,240,1,96,17 
4,20,27270 

1280 DATA 30,232,240,1,96,32,78,30,96, 
165,28270 

1290 DATA 194,133,192,165,195,133,193, 
32,47,30,29584 

1300 DATA 96,162,48,76,184,30,162,32,1 
69,12,30555 
1310 DATA 157,66,3,32,86,228,96,162,32 

,169,31586 

1320 DATA 5,157,66,3,169,0,157,68,3,16 

9,32383 



1330 DATA 30,157,69,3,169,18,157,72,3, 

169,33230 

1340 DATA 0,157,73,3,32,86,228,96,162, 

48,34115 

1350 DATA 169,3,157,66,3,169,4,157,68, 

3,34914 

1360 DATA 169,31,157,69,3,169,8,157,74 

,3,35754 

1370 DATA 169,0,157,75,3,32,86,228,169 

J 1. J 36674 

1380 DATA 141,240,2,96,69,58,162,48,16 

9,11,37670 

1390 DATA 157,66,3,165,194,157,68,3,16 

5,195,38843 

1400 DATA 157,69,3,165,198,157,72,3,16 

5,199,40031 

1410 DATA 157,73,3,32,86,228,96,169,1, 

133,41009 

1428 DATA 84,169,10,133,85,169,67,133, 

194,169,42222 

1430 DATA 31,133,195,169,16,133,198,16 

9,0,133,43399 

1448 DATA 199,32,6,31,238,84,96,66,105 

,110,44358 

1450 DATA 97,114,121,32,76,111,97,100, 

32,77,45215 

1460 DATA 101,110,117,65,0,32,153,31,3 

2,177,46033 

1470 DATA 31,169,0,133,194,169,30,133, 

195,169,47256 

1480 DATA 10,133,198,169,0,133,199,230 

,84,160,48572 

1490 DATA 6,173,83,31,201,78,144,12,16 

0,24,49484 

1500 DATA 165,84,201,16,208,4,169,3,13 

3,84,50551 

1510 DATA 132,85,173,83,31,141,0,38,16 

9,45,51440 

1520 DATA 141,1,30,32,18,32,32,6,31,23 

8 52001 

1530 DATA 83,31,96,173,18,30,201,83,20 

8,16,52932 

1540 DATA 173,11,30,201,89,208,9,173,1 

2,30,53868 

1550 DATA 201,83,208,2,184,184,96,173, 

1,30,54870 

1560 DATA 201,32,240,2,104,104.96,169, 

20,133,55971 

1570 DATA 84,169,4,133,85,169,215,133, 

194,169,57326 

1580 DATA 31,133,195,169,31,133,198,16 

9,0,133,58518 

1590 DATA 199,32,6,31,96,80,114,101,11 

5,115,59407 

1600 DATA 32,116,104,101,32,76,101,116 

,116,101,60302 

1610 DATA 114,32,111,102,32,89,111,117 

,114,32,61156 

1620 DATA 67,184,111,105,99,101,162,48 

,169,3,62125 

1630 DATA 157,66,3,169,16,157,68,3,169 

,32,62965 

1640 DATA 157,69,3,169,4,157,74,3,32,8 

6,63719 

1650 DATA 228,96,75,58,160,0,174,84,31 

,177,64882 

1668 DATA 194,9,128,157,159,32,232,280 

,200,177,66290 

1670 DATA 194,157,159,32,201,32,240,11 

,232,200,67748 

1680 DATA 192,10,144,241,169,32,157,15 

9,32,142,69026 

1690 DATA 84,31,238,84,31,96,0,162,8,1 

89,69941 

1788 DATA 159,32,232,285,68,32,288,247 

,169,68,71353 

1710 DATA 141,0,30,169,58,141,1,30,160 

,0,72083 

1720 DATA 189,159,32,153,2,30,232,200, 

281,32,73313 

1738 DATA 288,244,136,169,46,153,2,38, 

200,169,74670 

1740 DATA 42,153,2,30,200,169,32,153,2 

,30,75483 

1750 DATA 96,162,48,169,7,157,66,3,169 

,8,76368 
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1769 DOTft 157,72,3,157,73,3,32,86,228, 

281,77372 

1778 DflTft 65,144,234,285,83,31,176,229 

,9,128,78676 

1788 DATA 141,68,32,96,169,212,141,224 

,2,169,79922 

1798 DATA 29,141,225,2,96,226,2,227,2, 

124,88996 

1888 DATA 29,8,8,8,8,8,8,8,8.8,81825 



CHECKSUM DATA 
(see p. 15) 



188 DATA 529,428,828,163,86,66,286,854 

,647,199,879,738,789,497,755,7728 

268 DATA 46,323,373,838,117,111,56,885 

,919,626,141,134,965,917,121,6492 

1138 DATA 78,935,133,981,228,438,6,748 

,416,742, 755 , 731 , 273 ,431,165, 6956 

1288 DATA 911,788,485,188,911,963,135, 

838,193,126,178,452,425,957,496,7862 

1430 DATA 495,118,403,357,479,495,192, 

167,156,801,148,167,137,214,494,4815 

1588 DATA 491,481,634,487,269,16,861,1 

88,689,788,699,189,483,29,249,6225 

1730 DATA 463,956,186,949,334,264,969, 

862,4983 



Assembly language listing 



1 BIMAF 
I NAME 


Y LOAC 
OBJECT 


MENU PR 

FILE d: 


QBRAM 
AUTORUN.SVB 


1 RICHARD J. 


KALAGHER 




1 EQUATES 






1 

EL 




*ce 


iPABE ZERO TEMPS 


SH 




»C1 




STL 




«C2 




STH 




»C5 




ENL 




*C4 




ENH 




♦ C5 




DLL 




«C& 




BLH 




»C7 




CIO 




«E4S6 




ICCHD 




• 2342 


) COMMAND 


ICSAL 




t0344 


:buff addr low 


ICBAH 




• e34S 


1 BUFF ADDR HIGH 


ICAX 1 




««34A 


)AUX 1 


ICAX2 




• 0346 


lAUX 2 


ICBLL 




««34B 


■BUFF LEN LOM 


ICBLH 




*e349 


!BUFF LEN HIGH 


RQWCRB 




S4 


(SCREEN HOW 


CQLCRS 




BS 


(SCREEN COLUMN 


CRSINH 




*02F0 


(CURSOR INHIBIT 


i 


*•<■ 


• 1D7C 


(■».»SEE TEXT*** 


HENU 


JSR 


DPEN8C 


(OPEN SCREEN 




JSR 


HEADER 


(TITLE ON SCREEN 




JSR 


OPEDIR 


(OPEN DIRECTORY 


QB 


JSR 


GETDIR 


(BET DIRECTORY ENTRY 




BMI 


FOOT 


(DIRECTORY DONE? YES. 




JSR 


DIRSCN 


(PUT ENTRY ON SCREEN 




JMP 


GS 


(BET ANOTHER 


FOOT 


JSR 


FOOTER 


(CHOOSE MESSAGE 




JSR 


CL0SE2 


(CLOSE DIRECTORY 




JBR 


CL0SE3 


(CLOSE SCREEN 




JSR 


SETUP 


(SET RUN+INIT TO RTS 




JSR 


OPENK 


(OPEN KEYBOARD 




JBR 


9ETLET 


(GET A LETTER 




JBR 


CLOSES 


(CLOSE KEYBOARD 




JSR 


FINDNA 


(FIND FILE NAME 




JSR 


OPEFIL 


(OPEN THE FILE 


GETFIL 


JSR 


READ2 


[GET TWO BYTES 




JSR 


INIT 


[BET INIT DEFAULT 




JSR 


CHKFF 


[CHECK IF HEADER 




JBR 


STRfiD 


(PUT START ADDR 




JBR 


READ2 


(TWO MORE BYTES 




JSR 


ENDAD 


(PUT END ADDR 




JBR 


BUFLEN 


(COMPUTE BUFFER LEN 




JSR 


QETDAT 


(GET DATA RECORD 




BMI 


JSTART 


[START PROGRAM IF EOF 




JSR 


J INIT 


(TRY TO INITIALIZE 




JMP 


GETFIL 


(DO NEXT SEGMENT 


JINIT 


JMP 


(»e2E2) 


( INITIALIZE 


JSTART 


JSR 


CL06E2 


(CLOSE THE FILE 




JMP 


(«e2E«l) 


[START PROGRAM 


1 

R 


RTS 




(FOR INIT CODE 


1 START OF SUBROUTINES 


1 SET 


INITIALIZATION 


TO DEFAULT 



INIT LDA »R«.»FF 

STA »e2E2 

LDA »R/2S6 

STA »e2E3 

RTS 
( 
I OPEN THE DIRECTORY FILE 



I 

Bl 
FNAME 

BAL 

BAH 

( 

[ OPEN 

( 

OPEFIL 



LDX «»20 

LDA »Z 

STA ICCMD.X 

LDA •b 

BTA ICAXl.X 

LDA »B1V»FF 

STA ICBAL.X 

LDA (tBl/ZSi 

BTA ICBAH, X 

JSR CIO 
RTS 

.BYTE "DI! 
»» »+lB 
.BYTE »9B 
.BYTE e 
.BYTE « 



[ lOCB 2 

(OPEN COMMAND 



(DIRECTORY 



(FILENAME BUFFER 



(TWO BYTE BUFFER FOR 
(FILE HEADER AND ADDR 



FILE FOR READING 

LDX «*2a 

LDA «3 

BTA ICCMD.X 

LDA »FNAMEI<«FF 

BTA ICBAL.X 

LDA •FNAME/256 

BTA ICBAH, X 

LDA ^4 (OPEN FOR READ 

STA ICAX1,X 

JSR CIO 

RTS 



( GET A 


SEGMENT FROM 


THE FILE 


BETREC 


LDX •*20 






LDA »7 


[BET BYTES 




BTA ICCMD,X 






LDA SL 






BTA ICBAL.X 






LDA SH 






BTA ICBAH, X 






LDA BLL 






BTA ICBLL. X 






LDA BLH 






BTA ICBLH. X 






JBR CIO 






RTS 




( READ TWO BYTES INTO BUFFER »C» 


READ2 


LDA »BALi«FF 
STA SL 






LDA ((BAL/2S6 




STA SH 






LDA «2 






BTA BLL 






LDA (to 






BTA BLH 






JSR BETREC 


IBO BET THEM 




RTS 




( CALCULATE BUFFER LENGTH 


BUFLEN 


LDA ENL 
SEC 
BBC STL 






STA BLL 


(LOW BYTE 




LDA ENH 






BBC STH 






STA BLH 


(HIBH BYTE 




CLC 


[NOW ADD ONE 




LDA BLL 






ADC •! 






BTA BLL 






LDA BLH 






ADC *0 


J WE CARE CARRY 




BTA BLH 






RTS 




( PUT START AODRESS 




STRAO 


LDA BAL 
STA STL 
LDA BAH 
BTA STH 
RTS 




1 DO SAME FDR END ADDRESS 


ENDAD 


LDA BAL 
BTA ENL 
LDA BAH 
STA ENH 
RTS 




1 CHECK 


IF HEADER 




CHKFF 


LDX BAL 






INX 


(MAKE e IF tFF 




BED TEST2 


[TEST NEXT BYTE 




RTS 


(NOT A HEADER 


TEST2 


LDX BAH 

INX 






BED ITSFF 


(IT'S «FF 




RTS 




ITSFF 


JSR READ2 
RTS 


[TWO MORE BYTES 


1 GET DATA BYTES 




SETDAT 


LDA STL 
BTA SL 
LDA STH 
BTA SH 
JBR QETREC 
RTS 




1 CLOSE 


lOCBS 




CLOSES 


LDX »*ze 

JMP CLB 




CL0SE2 


LDX »*20 




CLB 


LDA ««0C 
BTA ICCMD.X 
JSR CIO 
RTS 




[ GET A 


DIRECTORY RECORD 


BETDIR 


LDX «»2» 


( lOCB 2 




LDA *S 


(GET BYTES 



BTA ICCMD.X 

LDA »FNAME8.«FF 

STA ICBAL.X 

LDA (IFNAME/23t 

STA ICBAH. X 

LDA ((IS (DIR 

BTA ICBLL, X 



ENTRY LENGTH 
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LDA Itii 

ETA ICBLH.X 

JSR CIO 

RTE 
I 

1 OPEN THE SCREEN 
I 

OPENSC L.DX »*ze 

UDft »3 I OPEN 

BTfl ICCMD^X 

LDA SBAitPF 

BTA ICBflL.X 

LDA »B4/2S6 

BTA ICBftH.X 

LDA »8 IMRITE 

STA ICAXl.X 

LDA *e I MODE 

STA ICAX2,X 

JSR CIO 

LDA »l lANY NONZERO 

STA CRSINH i INHIBIT CURSOR 

RTB 



I 

B4 



.BYTE "£:• 



ISCREEN DEVICE 



I WRITE TO THE SCREEN 

I 

WRITES LDX •»3a 

LDA »«eB I PUT CHARACTERS 

STA ICCMD.X 

LDA STL 

STA ICBAL.X 

LDA BTH 

STA ICBAH.X 

LDA BLL 

STA ICBLL.X 

LDA BLH 

BTA ICBLH.X 

JSR CIQ 

RTE 
1 

I PUT HEADER ON SCREEN 
I 

HEADER LDA »l 

BTA RQWCRB I ROW 1 

LDA »ie 

STA COLORS (COLUMN IB 

LDA »BSS.»FF 

BTA STL 

LDA »BS/25t 

BTA STH 

LDA »16 (BUFFER LENBTH 

BTA BLL 

LDA me 

BTA BLH 

JSR WRITES 

INC RDWCRS (LEAVE A SPACE 

RTE 
( 

B5 .BVTE "Binary Load M»ni.i " 
NUrlKEY .BYTE "A" 

OFFSET .BYTE B (FILE NAME OFFSET 
1 

1 WRITE DIRECTORY ENTRIES ON SCR 
I 
DIR8CN JSR CHKSYE (CHECK "SYS" EXT 

JSR CHKFRE (CHECK "FREE SECTOR" 

LDA HFNAMEi.*FF 

BTA STL 

LDA »FNAI1E/2S6 

BTA STH 

LDA Hia (USE NAME, NOT EXT 

BTA BLL 

LDA *e 

BTA BLH 

INC RDWCRS 

LDY *b 

LDA NUMKEY 

CMP #7B 

BCC FIRCDL 

LDY »24 (SECOND COLUMN 

LDA RDWCRS 

CMP »16 

8NE FIRCDL 

LDA »Z 

STA ROMCRS 
FIRCOL STY COLORS 

LDA NUMKEY (LETTER OF ENTRY 

STA FNAME (PUT IN BUFFER 

LDA 045 (DASH 

ETA FNAME+1 

JSR PUTBUF (NAME INTO BUFF 

JSR WRITES (PUT ON SCREEN 

INC NUMKEY (ADVANCE FDR NEXT 

RTB 
I 

i CHECK IF BYB FILE 
I 
CHKSYB LDA FNAME+ie 

CMP *e3 !5 

BNE N0T8YE 

LDA FNAME+1 1 

CMP »B9 [Y 

BNE NOTSYS 

LDA FNAME+12 

CMP »S3 IS 

BNE NOTSYS (SYS FILE? NO. 

PLA (YES-PULL RETURN ADDR 

PLA (DON'T WRITE TO "E:" 

NOTSYS RTB 
( 

I CHECK IF "FREE SECTOR" ENTRY 
I 
CHKFRE LDA FNAME+1 

CMP »*20 (IT SHOULD BE SPACE 

BEQ NOTFRE 

PLA 

PLA (SKIP REST OF SCREEN 

NOTFRE RTE 
> 

I WRITE PROMPT MESSAGE ON SCREEN 
I 
FOOTER LDA *2t 

BTA ROWCRS 

LDA *4 

BTA COLORS 

LDA »B6«c»FF 

STA STL 

LDA *B&/25<> 

BTA STH 

LDA *31 

BTA BLL 

LDA »0 

BTA BLH 

JSR WRITES 

RTS 
I 
B& .BYTE "Frmmt th. Lett.r" 

.BYTE " of Your Choice" 



[ OPEN KEYBOARD 

I 

OPENK LDX »»3B 

LDA »3 (OPEN 

BTA ICCMD.X 

LDA »B7»,«FF 

BTA ICBAL.X 

LDA »B7/2S6 

BTA ICBAH.X 

LDA «4 (READ 

STA ICAXl.X 

JSR CIO 

RTB 

B7 .BYTE "K:" [KEYBOARD DEVICE 

) 

( PUT FILE NAMES IN A BUFFER 

I 

PUTBUF LDY »e 

LDX OFFSET (CURRENT LOCATION 

LDA (STL) , Y 

ORA H«B1» (SET LAST BIT 

BTA NBUFF, X 

INX 

INY (FIRST LETTER DONE 

INY (SKIP THE DASH 

PI LDA (STL) ,Y 

BTA NBUFF, X 

CMP »32 (SPACE-? 

BEO P2 (YES, THEN DONE 

INX 

INY 

CPY Hie 

BCC PI 
LDA «32 

BTA NBUFF, X (MAKE LAST fi SPACE 
P2 STX OFFSET (SAVE FOR NEXT TIME 

INC OFFSET (INCREMENT OFFSET 

RTE 
( 

LETTER .BYTE 
( 

[ FIND FILE NAME IN BUFFER 
I 

FINDNA LDX *B 
LI LDA NBUFF, X 

INX 

CMP LETTER 

BNE Ll 

LDA 068 (D 

BTA FNAME 

LDA *SB [COLON 

BTA FNAME+1 

LDY «e 
L2 LDA NBUFF, X 

BTA FNAME+2,Y 

INX 

INY 

CMP tt«20 (SPACE? 

BNE L2 

DEY 

LDA »4& [PERIOD 

STA FNAME+2,Y 

INY 

LDA (t42 (ASTERISK 

BTA FNAHE+2,Y 

INY 

LDA (»*20 (SPACE 

STA FNAME+2,Y 

RTS 
( 

I BET A LETTER FROM THE KEYBOARD 
( 
GETLET LDX tt»3B [lOCB 

LDA «7 (GET BYTES 

STA ICCMD,X 

LDA HO 

BTA ICBLL.X 

BTA ICBLH X (BUFFER LENGTH ZERO 

JSR CIO (ACC-LETTER 

CMP »6S (LEES THAN "A"? 

BCC GETLET 

CMP NUMKEY ( > HIGHEST LETTER 

BCS BETLET 

ORA »teii (SET LAST BIT 

STA LETTER (SAVE IT 

RTS 
I 

1 SET RUN ADDRESS TO RTS 
( 
SETUP LDA »R«.»FF 

STA »B2EB (RUN LOW 

LDA HR/256 

BTA •B2E1 

RTB 
I 

( BUFFER WITH NAMES WILL BE AT 
( END OF PROBRAM. LETTER WILL 
( HAVE LAST BIT SET AND BE 
I FOLLOWED BY A HYPHEN. 
I 
NBUFF - » 

•- ♦B2E2 (INIT ADDRESS 

.WORD MENU (ADDRESS DATA 
I 

.END 
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Is It a Game 
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AiS 



Natq Commanderls 
available for Atari and 
Commodore 64 computers, 
48K disk or cassette. 
IBM-PC version will b> 
available shortly,. ^"^ ■. 



Sdggested reMil price for 
this outstanding r eal-time 
combat simulation js::^-^ 
S34.95. ^ ^^ 



!rKB75^a 



AcceTeF _., __ 
time simulation 



Full scrolling 
Euro pean^ 
Conti 
. TDemonstratJoff '~/ | 

Mode z'' y ,w> 

Save Gam e^ " ^ — - 
Feature X / i i 

• Five Battle / \ 

Scenarios / ' ' * 

• Four Skill Levels / / / 



PLAYERS HAVE: / / / 

• Tactical and Strategic Air Rower / 

• Tactical and NuclearForeies "T 

• Continuous Battlefield ^tatus and News Service 
Updates / / 

• Multiple Combat Ur^lts, Including: Infantry, Mechan- 
ized Armor and Attack Helicopters / 



If you can't find our games 
^ryour local store you — 
order by MasterCard,! 
Money Order, COD or cheolt- 
Add $2.50 postage and 
handling; MD residents add 
5% sales tax.-- "^ 




MicroProse Sof t^re ^"^^^ ^'"'^ °T "^^ """•^**' ™ ?i\^? 

/ j \ ATARI is the registered trademark of Atari, Inc. 

_,L^~,s2 / / Commodore 64 Is theVeglstered trademark of Commodore Business Mactilnes, Inc. 

*Sii^' DEALER INQUIRIES INVITED IBM-PC is tlie registered trademark ot Intematlona'l Business Uactilnes, inc. 



SpartaDOS and ARCHIVER IF 




From the authors of the CHIP! 

SpartaDOS is our all new command driven DOS fully compatible with all disk drives made for 
the Atari Home Computersy^ Supports all Atari compatible densities - both single and double 
sided, 5V4 and 8 inch. 

UltraSpeed™ I/O allows read/write 2 to 4 times faster than standard! * Comprehensive utilities 
include: a sector copier, RS-232 handler, and DOS file translators. 

ARCHIVER II allows UltraSpeed backup of all diskettes and compacting of multiple programs 
on each disk. Includes an exceptional editor, a speed check, and is fully automatic. 

Available now for Atari 810 and 1050 drives! Coming soon for most other brands. 



Suggested Retail Price $129.95 (plus shipping and installation) 



See SpartaDOS and ARCHIVER II now at leading computer stores or order direct from: 

Spartan Software 

Div. oflCD, Inc. 

828 Green Meadow Ave. 

Rockford.IL 61107 

815-229-2999 (1:00-9:00 p.m. CST) 

*Speed depends on drive hardware. A chip replacement is required for most drives. 

SpartaDOS, ARCHIVER II, and UltraSpeed are trademarks of ICD, Inc. Atari is a registered trademark of Atari. Inc. 
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DISK 
MISER 



BOOT DISK EMPTY 
SECTOR USE PROGRAM 



16K Disk 



by Sait Halman 



The Atari boot disk format is extremely ineffi- 
cient. A single boot-load program ties up the entire 
disk, even though it may occupy only a few sectors 
near the beginning. 

Disk Miser is a BASIC utility that lets you use 
the unoccupied sectors on a boot disk to store addi- 
tional DOS files. It scans the disk to determine which 
sectors are needed by the boot program, and marks 
those sectors as "in use" in the disk's Volume Table 
Of Contents (VTOC). If you aren't familiar with 
boot disks and the VTOC, refer to Tony Messina's 
Disk Tool articles in ANALOG Issues 8 and 9, and 
Charles Bachand's Burp! in Issue 9 for more infor- 
mation. (Both articles are reprinted in The ANALOG 
Compendium. — Ed.). Disk Miser also allows 
you to back up your boot disks using the "J" option 
of DOS II. This is considerably faster than using a 
"dumb" sector copier, because DOS will copy only 
those sectors which have been marked in the VTOC. 

Limiitations. 
You can use Disk Miser with almost any disk 
whose directory reads "707 FREE SECTORS." An 
exception should be made in the case of boot 
programs which load data off the disk during 
execution, such as text adventures and some multi- 
level arcade games. Such disks probably have very 
little empty space anyway. 




You should not try to write DOS files onto a disk 
processed by Disk Miser. Regardless of what's in 
the VTOC, DOS will alter the first three sectors on 
the disk and wipe out the boot program. Additional- 
ly, you should never use the Miser on a copy- 
protected disk, since you might mess up the protec- 
tion scheme and make the boot program unreadable. 

Blank sector handling. 
Disk Miser marks in-use sectors in multiples of 
eight. This simplifies the design of the program and 
also avoids problems with sectors which must 
remain blank in order for the boot program to 
execute (screen data, etc.). A problem may arise if 
the disk contains eight consecutive blank sectors 
which occupy the same VTOC byte. I've used Disk 
Miser on over two dozen boot disks and have never 
encountered this problem; but for safety's sake, I 
included a manual correction routine in Lines 600- 
660 of the BASIC program. If the sector map 
generated by the Miser indicates a nonzero (empty) 
byte surrounded by zero (occupied) bytes, answer 
the "LOCATION (0 TO EXIT)" prompt with the 
location of the nonzero byte. In the example shown 
in Figure 1 , you would respond to the prompt by 
typing 13 (RETURN). 

(Continued on p. 41.) 



MORE DISK DRIVE FOR YOUR MONEY 

In fact, with the ASTRA 1620, you get two superb Disk Drives for the 
price of one. The ASTRA 1620 is Single or Double Density (software 
selectable) and completely compatible with ATARI DOS or OSA+ DOS. 
When used as Double Density, the ASTRA 1620 has the same capacity 
as Four ATARI 810® Disk Drives. i 





DOUBLE 

OR 
SINGLE 
DENSITY 

The ASTRA 1620 can be 
either single or doubie 
density, depending on the 
software selected. One 
drive can be configured for 
single density and the 
other drive for double den- 
sity, or any combination 
desired. The ASTRA 1620 
is compatible with virtually 
any software available for 
ATARI® Disl< Drives. The 
ASTRA 1620 is smooth, 
quiet and fast. In Single 
Density mode, the ASTRA 
1620 stores 88K bytes of 
programs or files. In Dou- 
ble Density, the ASTRA 
1620 stores 176K bytes, 
simply twice as much. 



TWO DRIVES ... Yes, two superb disk drives in the same size enclosure normally used for one drive. The ASTRA 1620 measures 7%" wide x 
11%" deep X 5%" high. 

Two drives will open a new dimension of computing for you. The program disk can be in one drive and the data disk can be in the other. This will 
eliminate time consuming disk changes. Backing up disks and copying files will never be easier. Just follow the instructions on the screen and 
walk away. The job will be completed within minutes. We have simplified copying from single to double density. With two drives, it's just as easy 
as copying in one mode. No disk switching! 

Two double density drives give you the power that much larger and more expensive computers have without giving up any of the features avail- 
able on the ATARI® Home Computer. 

EASY TO USE ... The ASTRA 1620 comes complete with everything you need. Just plug it in, chain it up, and turn it on. 

The ASTRA 1620 comes with OSA+ DOS (The best disk operating system available for the ATARI® computer!). The OSA-i- DOS is completely 

compatible with all existing ATARI DOS files. Because the OSA+ user manual is very complete and technical, we include our own simplified user 

manual. Between the two furnished manuals, you have the information necessary to perform any task required of your disk drive. 

The ASTRA 1620 also contains a data cord, power transformer, and operator manual. 
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UOLUME TABLE OF CONTENTS 
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Location 13 (10^3 over) 












Manually mark as in use. fK 
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30 


255 


255 


255 


255 
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VTOC sector (360) 


35 


255 


255 


255 


255 


255 


and Directory 


40 


255 


255 


255 


255 


255 




45 


^0 


^127 


255 


255 


255 














368 


50 


255 


255 


255 


255 


255 




55 


255 


255 


255 


255 


255 




60 


255 


255 


255 


255 


255 




65 


255 


255 


255 


255 


255 




70 


255 


255 


255 


255 


255 




75 


255 


255 


255 


255 


255 




80 


255 


255 


255 


255 


255 




85 


255 


255 


255 


255 


255 



LOCATION (0 TO CONTINUE) 



Figure 1. 

Program notes. 

In Line 110, 1 initialize the "free sectors" variable 
FCES to 711 instead of 720 to reflect the 8 sectors 
(1-8) that are automatically reserved by the Miser, 
plus the one directory sector (368) which resides in a 
separate VTOC byte. During execution, sectors 
360-367 will be marked as occupied, reducing the 
maximum number of free sectors to 703. 

The POKE 14090,0 in Line 150 marks sectors 1-8 
as being "in use." The final POKE statement in Line 
210 fools DOS into thinking that the sectors 
occupied by the boot program are actually a locked, 
in-use DOS file. 

The main loop in Lines 270-310 works as follows. 
After each block of eight sectors is read into 
memory, the machine-language subroutine 
contained in ML$ checks to see if they are blank. If 
not, a zero is stored in the disk's VTOC to reserve 
that block. The entire process takes just under four 
minutes per disk. D 

Program variables. 

YN$ — For yes/no responses. 

A$ — Machine code to get/ write sectors: 
PLA ; pull # arguments from stack 

JSR$E453; use OS to access the disk 
RTS ; back to BASIC 

DUM$ — Dummy filename. 

ML$ — Machine code that checks whether 
the current 8-sector block is empty (see Listing 

2). 

DCOMND, DBUFLO, DBUFHI, 

DAUXl, DAUX2 — Memory locations for 
OS disk handler. 

FSEC, FHI, FLO — Number of free sectors. 

A — Dummy variable for USR calls. 

X,X2 — Dummy variables for FOR/NEXT 
loops. 

SEC, SECm, SECLO — Current sector 
number. 



BUF, BUFHI, BUFLO — Current buffer 
address. 

USEC, UHI, ULO — Number of used 
sectors. 

Listing 1. 

BASIC Program. 

10 REH « DISK MISER 

20 REM * by Sait HalHan 

30 REH « ANALOG COitputing ttl7 

48 REM 

50 REM « ONE-TIIK INITIALIZATION 

60 DIM YN$C3),A$C5),DUMSC8)^ML$C3e) 

70 POKE 769,1 :DCOMND=770:DBUFLO=772:DB 

UFHI=773 : DAUX1=778 : DAUX2=779 

80 FOR X=l TO 5: READ A: A$CX}=CHR$(A) :N 

EXT X:FOR X=l TO 36: READ A:HL$CX)=CHR$ 

CA) :HEXT X 

90 REM 

100 REM * PER DISK INITIALIZATION 

110 FSEC =711;P0KE D COMND. 82 

MiMilai ":; INPUT DUMS : IF L EN tOUMS J =0 



THEN DUMS="B00TDI5K" 
130 REM 

140 REM * GET SECTORS 360-361 
150 POKE DAUXl, 104: POKE DAUX2,1:P0KE D 
BUFLO, 0:POKE DBUFHI, 55 :A=USR CADR (A$)) : 
POKE J.4090 O 

160 POKE DAUXl, 105: POKE DAUX2,1:P0KE D 
BUFLO, 128 :POKE DBUFHI, 55 
170 A=USRCADR€A$)) 
180 REM 

190 REM « ADD EXTENDER TO FILENAffi 
200 REM « AND PASS TO DIRECTORY 
210 FOR X=l TO 8: POKE 14212+X, 32 :NEXT 
X:POKE 14208,106 

220 FOR X=l TO LEN(DUH$) :POKE 14212tX, 
ASC CDUM$ CX , X) ) : NEXT X 

230 DUMS="DUM":FOR X=l TO LENCDUM$):PO 
KE 14220+X,ASCCDUM$tX,X)):NEXT X 
240 REM 

250 REM » GET 8 SECTORS AT A TIME 
260 REM » AND CHECK FOR BLANKS 
270 FOR X=l TO 89: FOR X2=0 TO 7 
280 SEC=8»X+X2 : SECHI=INT tSEC/256) : SECL 
0=SEC-256»SECHI : POKE DAUXl , SECLO : POKE 
DAUX2,SECHI 

298 BUF=14336+128«X2 : BUFHI=INT tBUF/256 
) :BUFL0=BUF-256*BUFHI:P0KE DBUFLO, BUFL 
0:POKE DBUFHI, BUFHI 

300 A=USR CADR CA$) ): NEXT X2:P0KE 14879, 
X:IF USR CADR (»«.$})<> 255 THEN POKE 1409 
0+X,0:FSEC=FSEC-8 
310 NEXT X 
320 REM 
330 REM » MANUAL CORRECTIONS 

340 ? "If L'iimi:i^f!iai»a^«ii:na:i»a "; 
FSEC: FOR X=0 TO 17: POSITION 2,X+2:? 5* 
X:FOR X2=0 TO 4 
350 POSITION 6«X2+10,X+2:? PEEKC14O90+ 

5«X+X2> ; : NEXT X2 : NEXT X 

360 POS ITION 2,22:? " WiHf5l0Pi:^t»MIiM*g 
lTfc*<;ill;M " ; : INPUT X:IF X=0 THEN 420 
370 IF PEEKC14090+X) THEN POKE 14e90+X 
,0:FSEC=FSEC-8 
380 GOTO 340 
390 REM 

400 REM « FIND tt FREE/USED SECTORS 
410 REN « AND PASS TO DIRECTORY 
420 FHI=IHTCFSEC/256J :FL0=FSEC-FHI*256 
: USEC=720-FSEC : UHI=INT CUSEC/256) : ULO=U 
SEC-UHI«256 

430 POKE 14083, FLO: POKE 14084, FHI 
440 POKE 14209, ULO:POKE 14210, UHI 
450 REM 

460 REM * MRITE SECTORS 360-361 
470 POKE DCOMND, 87: POKE DAUXl, 104: POKE 
DAUX2,l:P0KE DBUFLO, 0:POKE DBUFHI, 55: 
A=USRCADRCA$)} 

480 POKE DAUXl, 105: POKE DAUX2, 1 :POKE D 
BUFLO , 128 : POKE DBUFHI , 55 : A=USR CADR CA$) 
) 
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THIS ONE'S A 

KEEPER. 

Unlike games that get 
stale'\ you'll USE this 
program- again & again 
for years to come. 

There's nothing else like 

DECISIONS . . . DECISIONS'" 

A TOOL FOR MAKING LOGICAL CHOICES. 

Combines scientific decision-making principles 
with your computer's power, to shine new light 
on business, personal, and family decisions. 

.-EASILY SORT OUT CONFUSING INFORMATION. 
"REMOVE UNCERTAINTY FROM DIFFICULT CHOICES. 
"CLARIFY AND QUANTIFY YOUR IDEAS. 
"SHOW OFF YOUR COMPUTER'S PRACTICAL SIDE! 

Leads you step by step through any problem ; 
analyzes your choices with swift computer 
accuracy; displays the results in easy to 
interpret graphic form, on your TV screen. 

DECISIONS.. .DECISIONS program disk for 48K ATARI 
and complete reference manual, in handsome binder, 
only $37.50 including shipping, add $2.25 tax in Calif. 
ORDER NOW -you II be glad you did. Send check to: 

D«pt. 2 
KO. Box 605 
SUnton, CA 90680 
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^ SOFTWARE 



SUPERIOR QUALITY 
PERIPHERALS convoioqic 



The BYTEWRITER is a multi-use EPROM burner that interfaces 
to your computer through joystick ports 1 and 2 or 3 and 4 (software 
selectable). The BYTEWRITER reads, writes and verifies EPROMS: 
2516, 2716, 2532, 2732, 2564, 2764, 68764, 27128. No personality 
modules. Will read operating system ROMS. 

Operational software will support inspect and change, constant 
store, cassette and disk I/O. Source Code available for J35.00. 

BYTEWRITER - $1 89.00 

The BYTEREADER option interfaces cartridges to BYTEWRITER. 
BYTEREADER - $30.00 

The NEW 1850 expansion unit provides a versatile interface be- 
tween your 400/800 and peripherals. Residing on the 810 bus with 
your disk and/or cassette drive, it can provide for communication to 
Centronics compatible printers and RS-232 asynchronous devices, 
such as a modem. An internal 2K buffer region is allocated to meet 
the requirements of printer and serial activity. 

NEW 1850 -$149.00 

Cartridge boards dual socketed for 2764's, to make 8K or 16K - 
Cartridges - $7.50, Shells for cart. $5.00, 2764 EPROM - $1 0.00. 

Ask for free brochure. 



Each accessory is fully assembled with a 90 Day Limited Warranty. Mail Cashier's Check or 
Money Order for 4 to 6 weeks delivery. Shipping and handling S4.00 domestic, S6.00 foreign, 
C.O.D. orders S3.00 extra, add 4'« to Visa and MasterCard Orders, S30.00 minimum order to; 

_r^.....-.. ^_._ ORDERS ONLY 

rUflJr^GLDGir.injr. '■T.^^Voir 

Send for FREE Brochure - Dealer Inquiries Encouraged. 
421 Bay Tree Lane, Longwood, FL 32779, (305) 869-6630 



JFREE SECTORS 
USED SECTORS: 
riANOTHER DISK 



THEH llu 



NEED ANOTHER? 
■;F5EC 
;USEC 
; : INPUT VN$:IF VN 



490 REN 

500 REM * OLL DONE; 

510 ? 

520 ? 

530 ? 

S(1,11="Y' 

540 END 

550 REN 

560 REN * NACHINE CODE FOR A$ 

570 DATA 104^32^83,228,96 

580 REN 

590 REN * NACHINE CODE FOR !«.$ 

600 DATA 104,162,0,134,213,189,0,56,20 

8,21,189,0,57,208,16,189,0,58 

610 DATA 208,11,189,0,59,208,6,232,288 

,233,202,208,2,162,0,134,212,96 



CHECKSUM DATA 
(see p. 15) 

10 DATA 798,805,296,257,589,924,582,88 

0,267,625,668,849,83,539,458,8620 

160 DATA 85,370,98,684,378,661,489,982 

,88,416,986,240,806,619,634,7536 

310 DATA 765,84,126,266,87,369,743,727 

,105,746,385,529,312,355,95,5694 

460 DATA 323,798,937,107,362,122,76,23 

4,46,97,737,101,106,81,196,4323 

618 DATA 229,229 



Listing 2. 
Assembly source for ML$. 

DISK MISER BY SAIT WLMW 
ASSEMBLY SOURCE FOR MU 



6128 



8140 
8158 
8168 
8178 
8188 
6198 



8218 
8228 



8248 
8258 
82i&8 
8278 
8288 
8298 
8388 
8318 
8328 
8338 
6348 
8358 
8368 
8378 
8388 
8398 



hi = ID4 

BUFl = $3888 

BUF2= $3988 

BUF3= $3Ae8 

BUF4= $3B88 

' «= $3688 

' PLA 
LDX 18 
STX FRe+1 



LOOP 



LDA BUF1,X 
WE DATA 
LDA BIF2,X 
B^E DATA 
LDA BUF3,X 
B^£ DATA 
LDA BUF4,X 
B^£ DATA 
INX 
B^£ LOOP 



BASIC RETURN REGISTER 
SECTOR 1/2 BUFER 
SECTOR 3/4 BUFFER 
SECTOR 5/6 BUFFER 
SECTOR 7/8 BUFFER 

COULD GO emiVERi. 

t \m PARWETERS: IQWRE 
ZERO MSB OF RESULT 
AND INIT LOOP 

IF BYTE IS NZ, 
MAia(BL(0 
CHECK 2N0 PAGE 

3RD PAGE 

4TH PAGE 

CO^fTlNUE LOOP 
UNTIL D»£ 



ALL SECTORS EMPTY, 30 

TELL BASIC WITH A "TRUE" FLAG 



8418 
6428 
8438 
6448 
8458 
8468 
8478 
8488 
8498 
6588 
8518 



DEX 
WE EXIT 



; X = $FF 



; DATA BYTE OISCOUERED. SO 
I PASS A ZERO BACK TO SaSIC 

&)TA 



EXIT 



LDX #8 

r 

STX FR8 
RTS 



; RETURN TO BASIC 



UE>N*. 



You K&i be able to 
reduce your taxes by 



For Your Atari Computer 

TRS 80 Color, I, III, 4 or Apple Computer 




- inco«ie 
averaging 

- inccMie 
splitting 

- tax shelter 




>.3ji Ty Mewsboy Ea 



Dol lars 
earned 



Joe oave Ed Carl 



Hhat is the title of this graph? 



dailv earnings 
of newsboys 



boys selling 
newspapers 



Over 1000 Programs with Full Time Audio Narration, Pictures & Text! 

Interactive Tutorial Programs 



All along you've heard there isn't much of a 
selection of low cost microcomputer course- 
ware. Well, do you want to learn Physics, 
Psychology, or Philosophy' Accounting or 
Auto Mechanics? Sociology, Supervision or 
Statistics? Economics or Electronics? How 
about English as a Second Language? Would 
you like to teach your children Math or Read- 
ing? If you do. then we have the educational 
programs for you — and at affordable prices. 

It's true there aren't many companies that of- 
fer full-length courses in subjects other than 
reading and arithmetic, and what is offered 
seems to be drills, tests, games, or simula- 
tions. What you really want is a course that 
covers the subject with, say, 16 full-length 
lessons called tutorial programs, where you in- 
teract with an expert programmer backed by a 
staff of experts. That's exactly what we have 

Is there something wrong with our software? 
Well, we don't ask you to enter your name so 
we can drop it into some later text. We don't 
ask you to type in your answer and refuse to 
accept it if it's not spelled just right. And. we 
don't branch around a lot when you make an 
error. Our programs simply let you know if 
you're wrong by proceeding only when you 
select the right multiple-choice answer. 

This proven learning-by-positive-reinforce- 
ment method lets you proceed quickly and 
smoothly through the programs, without a lot of 
cute tricks. But, if you're a devoted com- 
puterist or game freak you may be disap- 
pointed at the lack of motion in most of the pic- 
tures, or our special visual effects. We have 
some dandies, like the mushroom cloud that 
rises over Hiroshima in our History series, but 
your learning is not distracted by needless 
special effects. 

OVER 1000 PROGRAMS 

We have 64 courses of 1 6 half-hour pro- 
grams; 1024 programs! All are easy-reading, 
upper- and lower-case All are in color. All are 
illustrated by frequent graphics composed of 
special and regular characters. And, best of 
all, every frame of every program is accom- 
panied by high-quality, full-time audio narration 
by professional voice talent, David Stanton, 
James ^Aa\hers, Pam Barrymore. Recorded 
and played back, not synthesized or digitized! 



- If your child is having trouble with Reading or 
Math, or if he or she is exceptional, and 
could benefit from professionally program- 
med lessons or courses, then you need our 
educational programs for your Atari, Apple, 
or TRS 80 to help your child. 

- If you want to build your math skills, we have 
programs on Numbers and their meanings. 
Addition, Subtraction, Multiplication, Divi- 
sion, Fractions, Decimals, Percents, Angles, 
Graphs, Word Problems. Algebra, Statistics 
There are ten series in all, 160 math pro- 
grams Again, all with color, pictures, and a 
friendly tutor's voice — all the time. 

-If your verbal skills need polishing, try our 
Talk & Teach programs on the alphabet, 
spelling skills, and every level of vocabulary; 
Sight Words or Learn by Phonics; develop 
Reading Comprehension skills from stories 
and articles There's even a series on the 
Great Classics, 

-For self-development, try a 1 6-program 
course in Economics or Psychology. Or 
Supervision, Sociology, Counseling (Per- 
sonal, School, or Employee), Writing, 
Business. Philosophy. Government. World 
History. U S History, or Accounting 



— For vocational skills, study our 1 6-program 
courses in Electronics, Fluid Power. Auto 
Mechanics, Shop Carpentry, Construction. 
Meat Processing. Military Skills (64 pro- 
grams), and there are many more 
There are 832 programs for your Atari, Apple 
and TRS 80 Mod I III 4 and 160 lor the Color 
Computer Send for a free catalog 

Would you like to do something more than 
play games on your computer? Tired of 
squeaks and robotics and want to hear a 
human voice? Do you want to further your 
education or help your children along in theirs? 
Now you can. For just $8.80, we'll send you 
one cassette with 2 programs from the course 
of your choice, 1 00°o guaranteed to work in 
your Atari, Apple, or TRS 80 computer, and 
you can try us out. Better yet, get one full 
course of 1 6 programs on 8 cassettes for only 
$59.90. Atari Master Cartridge, $9.95; Apple 
T T Board, $99.00; and T/T Player, $79.00. 
That's less than books and tuition for most col- 
lege classes. And we offer a 1 day, 1 00°o ex- 
change allowance Does your alma mater? Send 
us your check, or call us at 1 •800-654-3871 
with your '^isa/Master Card number. We'll send 
your educational software pre-paid. Please 
allow 1 5 days delivery. Or see your computer 
dealer. He may have some of our courses in 
stock. You've got nothing to lose but your games! 



We're Your Educational Software Source. 



Course 


No. of Programs 


Reading 


256 


Mathematics 


128 


Comprehension 


48 


History 


32 


Algebra 


16 


Spelling 


16 


Government 


16 



16 Programs in each of the following: 

Carpentry-Electronics-Health Services 

Office Skills-Statistics-First Aid/Safety 

Economics-Business- Accounting-Psychology 

And Many More! 



For your Atari 400/600/800/1200, you will 
need the Atari cassette recorder and the Dorsett 
4001 Educational Master Cartridge, $9.95. For 
your Apple II, you will need the Dorsett M402 
T/T plug-in board, $99.00, and the M401 stereo 
cassette player, $79.00. All programs listed are 
available for TRS 80, I, III, 4, which require the 
M203 speaker converter, $99,00, and 401 
stereo cassette player. $79.00. 

Send for a catalog of over 1000 programs 
for Atari, TRS 80, Apple, etc. 



For more information, whte or call: TOLL FREE 1 -oOO-OOA-ob/ I 

Dealer inquiries welcome | L— J—J 



DORSETT 

Educational Systems, Inc. 

P.O. Box 1 226, Norman, OK 73070 
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OPERATION WHIRLWIND 
by Roger Damon 
BRODERBUND SOFTWARE 
1938 Fourth Street 
San Rafael, California 94901 
48K Disk $39.95 



by Pat Kelley 



Almost every Atari game released these days is 
either a retread of an arcade hit or a pale imitation 
of a past home computer success. Refreshing ideas 
are few and far between. So it was with some 
trepidation that I tore the shrinkwrap off of 
Operation Whirlwind, the latest strategy game 
from Broderbund. It looked like little more than a 
juiced-up version of Chris Crawford's Eastern 
Front 1941 in glossy packaging. After all, the 
scenario is similar: You command an attack force 
comprised of Infantry, Armor (heavy and light). 
Artillery and Engineer/Shock Troops. Your 
objective is to engage and bypass enemy units of 
similar strength, and to occupy cities with minimum 
loss to your forces. This, I was happy to discover, is 
where all similarity ends. 

The game. 

Whirlwind begins with your forces placed on 
the far left side of a scrolling relief map, with each 
unit of your army designated by a symbol. 
Positioning your forces is a simple matter; simply 
place a joystick-controlled cursor over the desired 
unit, and move at will. Holding down the fire button 
calls up a text window full of information about the 
unit (class, strength, mobility and firepower). This 
window will also inform you when you cannot move 
a certain unit into an area, whether a unit is under 
fire, when a unit has overextended itself or if you're 
attempting to move one unit through another — a 
definite no-no! 

The joystick lets you fine-scroll across the map 
and view the obstacles that await you. The map 
represents a total area of fifteen kilometers from 
end to end, a distance you must blitz across if you 
are to capture the enemy city and win victory for 
your Fatherland. But the road to Valhalla is a 
rough one, indeed. 

Blazing combat. 

Once you activate your forces. Operation 
Whirlwind is underway, and attack can come at 
any time. Cautious movement at this stage is advised. 
As in real combat, you are advancing into unfamiliar 
territory, and you never know exactly where your 
adversary is until he gives himself away. Enemy units 
are invisible until they open fire on you, usually at 
whites-of-your-eyes range. 

Commands to your units at this stage are given 
in five distinct phases: 



1 . Command. In this stage of the conflict, 
you must determine the status of each unit in 
your command. You decide which units will 
Dig In and hold their ground, and which will 
Become Combat Ready. The Command phase 
allows you to replenish a unit's strength if 
damaged under fire. Dig In gives weary units a 
chance to recuperate, and hopefully fight 
another day. I'm personally something of a 
tyrant when it comes to this, as all of my units 
are on the advance all of the time. George Patton 
would be proud. . . 

2. Movement. This is where the stuff really 
starts to fly. Whirlwind's Movement phase 
gives you an opportunity to carefully feel your 
enemy out. Select units are commanded to 
slowly advance in an attempt to draw enemy 
fire, thereby pinpointing their heretofore secret 
positions. Only your movement will persuade 
them to come out and reveal themselves. 











Operation Whirlwind. 



3. Combat. The enemy has shown himself at 
last, and the real confrontation begins. This is 
the phase that separates the men from the boys. 

Your best combat tool is your artillery. 
Blessed with withering firepower and virtually 
unlimited range, your big guns can mortally 
wound the enemy. The computer displays a 
crosshair for you to place over the enemy unit 
you wish to engage, and the rest is up to you. By 
pressing joystick trigger, you order the selected 
unit to open fire and send out the hurt. How 
much hurt you dispense is for you to decide. 
You'll learn quickly which of your units are the 
most powerful, and which the least. The 
devastating power of your artillery is a joy to 
behold, and will get you out of many a tight 
spot. 
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Once you feel that you've gained enough 
headway in a particular firefight, or have 
decimated enough enemy units, it's time to 
move on to the next phase: 

4. Assault Orders. Now you can finally get 
some use out of those Engineers who've been 
hitching a free ride. Use the joystick to select 
which of the Engineer or Infantry units you 
wish to begin the assault, and send them on their 
way. 

5. Assault. This is when you enjoy the fruit 
of your labors. Blown bridges can be rebuilt 
now if you have ordered Engineers to do so in 
the previous phase, paving the way for your 
armored units to roar into the city. Infantry 
troops begin shock action, mopping-up and 
dislodging any remaining bastions of the enemy 
overrun in your blitzkrieg. Whirlwind's 
Assault Phase lets you watch routed enemy 
units pulling back for a last-ditch defense of 
their citadel; a heartwarming sight. Don't get 
too optimistic at this point, though. The battle 
has not yet been won. 

As your remaining forces group for their final 
rush into the city, the first in a long series of 
house-to-house, street-to-street exchanges begin. 
As before, enemy units remain hidden until you 
practically step on their toes, but this time you'll 
notice a dogged sense of defiance in the way they 
appear, seemingly in the jaws of defeat, to fight 
on. Make no mistake: this final push into the 
city is no cakewalk, and — more often than not 
— you'll want to pull your hair out as you try to 
stamp out pocket after pocket of resistance 
before Whirlwind makes its decision on your 
future as a career officer. 

Promotion ... or the Eastern Front? 

The computer is a stern and very particular judge. 
Once it has bestowed a performance rating upon you 
at game's end, no amount of screaming, cajoling, 
abuse or keypounding will sway it. The only thing 
that can help you win a more favorable rating is you, 
and your previous experience as a leader of mien. 

These are the possible ratings or "victory levels" 
awarded at the end of a round of Operation 
Whirlwind; 

1 . Questionable. Your victory is tenuous at 
best. An enemy counterattack would probably 
dislodge you, and as such you'd have to trade 
your Officer's uniform in for a burlap one with 
numbers stenciled on the side. Hang your head 
in shame. 

2. Marginal. You've clawed a foothold into 
enemy territory, and are holding on by the skin 
of your teeth. A few more casualties and you'd 
be going by the name of Questionable. Next 
time, try to be more forceful in your assault. Go 
read The Tank In Attack by Irwin Rommel. 



3. Tactical. The operation has succeeded 
totally. You have dealt a severe blow to enemy 
morale, and have crushed their will to fight. In 
securing the city, you have won a major victory, 
and have provided Military High Command 
with another steppingstone in the war. 
Congratulate yourself on a job well done. 

4. Strategic. Your swift advance and lightning 
assault has created a New Front in your sector, 
and you have practically assured victory for all 
future exercises within the region. This 
campaign has bolstered your career as an 
officer, and has made you the one to watch in 
the future. Add another Cross of Iron to your 
collection. 

5. Breakthrough. Your victory has become 
a turning point in the war. With the citadel's 
capture comes the assurance that the war will 
soon be over, and unconditional victory is 
yours. Nice shooting, General. 

Well, there you have it. If you thrive on the science 
of war, Roger Damon's Operation Whirlwind is 
definitely your cup of tea. This fine simulation 
proves that computer games don't have to be part of 
the crowd to succeed. D 




ELectro-NOTCH 



Electronic Write Protect 
or Protect Override 



SLO-SEC 



Slow Speed Control for 
Writing Bad Sectors 



SAVE !! on COMBO'S 

ELectro-NOTCH & SLO-SEC 



Zlp-COPI 

Automatic Sector Copy 
Program 



For RANA 1000: SLO-SEC and 
Protect Override are combined 
on a single switch 

Discount of $ 2.00 for Zip-COPI 
and any other product together 



Atari is a Iradpnart oi Atari, Jnc 
Rana i; a tradenark o{ Itana Si'stens, Inc 



ATARI 


810 


31,95 


ATARI 


1050 


34,95 


RANA 


1000 


33.95* 


ATARI 


810 


9,95 


ATARI 


1050 


14.95 


RANA 


1000 


33,95* 



ATARI 810 37,95 

ATARI 1050 41,95 



ALL ORIVES 



16,95+ 



Ssne) for iree catalog 

All itens fpd. USA and Canada 

Allou tuo weeks ^or personal checks 

yiSA/WSTERMRDMelcDne 






ARE 

1704 Princess St. 
Wilmington, NC 28405 
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by Sally Forth 



I want to thank you for your article in Issue #13 of 
ANALOG. It was a great help in learning FORTH. 
I was able to compare the BASIC and FORTH programs, 
and finally understood a couple of simple techniques. 

I've been playing with valFORTH for almost six 
months with very little success. True, I haven't devoted all 
of my energies to learning FORTH, but I do have about 
ten different books on the language. They all fail in one 
thing: How to actually program something. They go to 
great pains to explain the stack, numbers, and why the 
language is great. But examples of code and explanations 
of the how and whys, they do not have. 

I have a question that you might be able to address in 
one of your articles. I read keycodes a lot in my BASIC 
programs, but I have }iet to figure out what 1 have to do to 
perform the same function in FORTH. M31 BASIC code 
looks something like this: 

18 KEYB0ARD=53775 : UNT0UCH=255 : RESPONSE 

=764 

390 KEY=PEEK(KEYBOftRD}:IF KEV=UNTOUCH 

THEN Z9& 

318 IF PEEK {RESPONSE! =15 THEN CH=CN+1 : 

GOTO 498 

328 IF PEEKCRESP0NSEJ=14 THEN CN=CN-1 : 

GOTO 498 

338 IF PEEK{RESP0HSE)=12 THEN 528 

348 GOTO 388 

M)i main hangup is figuring out which control structure to 
use (IF/ELSE, BEGIN/UNTIL or WHILE/REPEAT) 
to accomplish the job of Line 300. When I use the 




debugger and watch the stack, the values always seem to 
be wrong. 

I appreciate any help you would be willing to provide. 
Please keep the articles coming. There's a lot of interest in 
m)! local user group in using FORTH, but it seems to be 
too difficult to learn. 

Jim Watson 
Corpus Christi, Texas 

Don't give up hope! Your problem is a bad case of 
BASIC On The Brain, not incurable, but difficuk to 
shake off. 

Your BASIC code for reading the keyboard is 
more complicated than it has to be. You could do 
the same thing with: 

18 KevC0DE=764:CLE0R=255 

388 K = PEEKfKEVCOr>EJ ;IF K=CLE«»R THEN 38 

8 

318 POKE KEVCODE, CLEAR: IF K=15 THEN CN 

=CN+1:G0T0 498 

328 IF K=14 THEN CN=CN-1:G0T0 498 

338 IF K=12 THEN 528 

348 GOTO 388 

The FORTH equivalent looks like this: 

t First, declare the variables 
c K and CN. ) 

8 UARIOBLE K f holds last keypress ) 
8 VARIABLE CN C prograM variable } 

c Now declare KEVCODE and RESET as 
c FORTH constants. ) 
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764 C0N5T0NT KEVCODE 
255 CONSTANT RESET 

t The following definition is used to 
( scan the hardware's keyboard 
C register until a key is pressed. 
i The register is then reset and the 
C internal keycode is left on the 
( stack. ) 



GETKEY C 



- n ) 



BEGIN 

KEYCODE CG RESET <> 
UNTIL 

KEYCODE CO RESET KEYCODE C? ; 



C Let's define a couple of dunny 

( words [LINE45e and LINE52e] 

( to represent the corresponding 

{ lines of BASIC code. Vou would 

C replace these with definitions that 

C suit your application. ) 



LINE490 
." LINE 490 " 
." CN = " 
CN e . CR ; 

LINE528 
." LINE 520 " 
.'■ CN = " 
CN G . CR : 



( display line It ) 
( and value of ) 
( variable CN ) 



c sane as LINE49e ) 



I assume that your prodigious FORTH library 
includes Leo Brodie's Starting FORTH (Prentice- 
Hall). Concentrate your reading on this book; it's the 
clearest introduction to the FORTH language ever 
published. 

Did I do that? 

I goofed. Last month's FPLOT utility had a cou- 
ple of itsy-bitsy bugs, which I didn't notice until it 
was too late to fix them in the magazine. 

The ROWCRS and COLORS constants declared 
in screen #1 refer to the wrong locations. Even more 
embarrassing, my plot-mask tables PMASKS and 
NMASKS were written backwards! FPLOT still 
works after a fashion, but the horizontal positioning 
of the pixels is somewhat skewed; and you can't 
follow up an FPLOT with an OS DRAWTO with 
reliable results. Blame it on a Christmas botde of 
Bailey's Irish Cream, which makes even reverse Pol- 
ish notation look sensible in holiday doses. 

The remedy is easy and effective. Simply replace 
screens 1-3 of the original FPLOT listing with the 
following: 



DOKEV ( the control selector J 
BEGIN C start indefinite loop ) 



(Forth screens next page.) 



GETKEY 
K > 

K G 15 
IF 



( fetch keypress and ) 
C save it in K J 

( IF Kzl5 ) 



1 CN +! C CN=CN+1 
LINE490 ( execute LINE49e 
1 C leave a "true" flag 
I on stack to exit 
C BEGIN/UNTIL loop 



ELSE C Otherwise . . 
f IF K=14 J 



K G 14 = 
IF 

-1 CN *: 
LINE430 

1 

ELSE 

K G 12 
IF 



( CN=CN-1 

C do LINE498 

C and exit loop 



= ( IF K312 ) 



LINE52e t do LINE52e 
1 C and exit 

ELSE < if all else 

f fails, 
( tell UNTIL to 

C keep looping 



ENDIF 
ENDIF 
ENDIF 



UNTIL 



( end indefinite loop ) 
C end definition ) 




FIRST BORN IN 1978! 



the original & continuously updated 

CCA 
Data Management 

System 



Now Available For Atari Computers 
For Apple Computers 
ForCPM Based Computers 



S 99.50 
150.00 
225.00 



A 



Uses 



CCA Data Management System 



' Business 
Accounts Receivable 
Accounts Payable 
Inventories 
Billing 

Lists and Rosters 
Home Ptione Lists 
Budgets, Hobbies 



Features And Capabilities 

' Long record lengths 

' Up to 24 fields per record 

' Not Copy Guarded 

' Alpha numeric items 

' Numeric only items 

' Add, update, scan, etc. files 

10-Level sort ascending, descending, 

allows alphabetizing data file. 

• Contact your local dealer for 
details or write us for our catalog 



DIVISION OF CUSTOM ELECTRONICS, INC 

SOFT\A/ARE 

238 Exchonge St., Chlcopee, Moiiachusetti 01013 

(413) 592-4761 

Mastercord & VISA Accepted 

• Dealer And Distributor Inquiries Invited 

Closed Mondoys — Open Doily 'Til 5:30 — Fridoys 'Til 8 
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SCREEN «1 

e < HIGH SPEED MODE F PLOTTER ) 

1 

2 ( Reserve space -for tables > 

3 

4 DECIMAL 

5 

6 LABEL YLOUS 192 ALLOT ( I sbs > 

7 LABEL YHIGHS 192 ALLOT < msbs ) 
8 

9 < OS equates > 
18 

11 99 CONSTANT ROl'JCRS ( REVISED ) 

12 91 CONSTANT COLCRS ( REVISED ) 

13 88 CONSTANT SAWSC 
14 

15 — > 

SCREEN «2 



e 

1 

2 

3 

4 

5 

6 

7 

8 

9 

18 

11 

12 

13 

14 

15 



< HIGH SPEED MODE F PLOTTER ) 

2 BASE ! ( for conyenience ) 
LABEL NMASKS ( REVISED ) 



81111111 
18111111 
11811111 
11161111 
11118111 
11111811 

luiuei 

11111118 



c' 
c' 
c! 

c; 



eiiiiiii 

18111111 
11811111 
11181111 
11116111 
11111811 
11111181 
11111118 



8' 

c: 

c' 
c' 
c! 



— > 



SCREEN #3 



6 

1 

2 

3 

4 

5 

6 

7 

8 

9 

18 

11 

12 

13 

14 

15 



( HIGH SPEED MODE F PLOTTER ) 
LABEL PmSKS < REVISED ) 



8 C, 
6 C, 
8 C, 
8 C, 
8 C, 
8 C, 
8 C 
8 C, 



18888688 C, 

1888868 C, 

188668 C, 

16668 C, 

1886 C, 

168 C, 

18 C, 

1 c, 



DECIMAL 



— > 



Now that FPLOT is fully operational, we can 
move on to more advanced graphics concepts like 
line drawing. Screens 18-31 contain the valFORTH 
assembly definition of VFAST, which draws vertical 
lines in ANTIC mode F at breathtaking speed. It's 
great for filling in blocks of screen, drawing bar 
charts and various types of animation. And it works. 
I promise! 

VFAST and the demos that follow it share many 
of the FORTH words we defined last month for 
FPLOT. That means you have to compile the 
FPLOT screens into your system first, before load- 
ing VFAST. Here's the procedure for LOADing and 
testing VFAST: 



1. Replace screens 1-3 of FPLOT with the new 
code shown above. 

2. Make sure the valFORTH Assembler, Gra- 
phics and Color libraries are compiled into your 
system. If not, LOAD them in now or you'll wish 
you did. (Check Valpar's documentation for more 
information.) 

3. Now LOAD the complete set of FPLOT 
screens (1-17) into your system. Track down compi- 
lation errors and re-LOAD as needed until every- 
thing's okay. 

4. Now you can LOAD screens 18-31. Small typos 
in FPLOT may now become evident. If not, answer 
the "ok" prompt with SLOWLINE and watch how 
long it takes Atari's clunky old PLOT and DRAW- 
TO routines to fill a mode F screen with 320 vertical 
lines. Then try FASTLINE and all your effort will 
seem worthwhile. I got execution times of 2602 jif- 
fies for SLOWLINE and just 198 jiffies for FAST- 
LINE, over thirteen times faster! 

"We control the vertical." 

The rules for using VFAST are similar to those for 
FPLOT. First, set up the high-res screen with a 24 
GR. call. Next, execute the word PLOTSETUP to 
initialize the look-up tables that make FPLOT and 
VFAST so swift. Don't forget to call PLOTSETUP 
or your machine will lock up the instant you call 
VFAST! Select a drawing color with n COLOR, 
where n equals 1 for foreground or for back- 
ground. Both FPLOT and VFAST are now ready to 
use. The syntax of VFAST is: 

HI yi V? — 
where XI is the X-position of the desired vertical 
line, Yl is the Y-position of the first endpoint you 
want to draw and Y2 the position of the other 
endpoint. Thus the command: 

7« 78 5fl UFOST 
will produce exactly the same result onscreen as: 

( or FPLOT ) 



28 2fl 
70 50 



PLOT 
OR. 



except that VFAST will finish drawing a lot sooner. 

VFAST is friendlier than FPLOT because it 
checks to make sure your parameters are within legal 
ranges. Pass VFAST a bad X 1 , Y 1 or Y2 value and it 
will jump back into FORTH without drawing any- 
thing. Venturesome programmers may wish to mod- 
ify VFAST so that it "clips" lines at the edge of the 
screen. Incidentally, VFAST leaves the coordinates 
of the last point it has drawn (XI, Y2) in the Atari's 
OLDROW and OLDCOL registers, so you can 
follow it up with a regular DRAWTO command if 
you like and the operating system will never know 
the difference. I know I said that last month too, but 
this time I really mean it! 

That's all there is to lightning-fast vertical lines in 
valFORTH. Bet you can't guess what I'll be showing 
you next month. D 




COMPUTEi 
PALACE 



A World-Class Drive For Your 
ATARI Computer... 

T/iewJ 




INDUS GT 

-Quiet and Reliable 

-Faster I/O than Atari 1050 

-True Double Density 

-Includes DOS & Free Software 
for Word Processing, Data- 
base & Spreadsheet!!! 

$419.00 ""^F'^ight 



Figure Your Own Income Taxes 
With The Amazing... 

TAX ADVANTAGE 

From Continental Software 48K Disk 

■Takes you line by line through 
Form 1040 as well as Schedules 
A,B,C,D,E,G,SE,W AND 4562 

•Simple, plain English prompts... 
You just fill in the numbers! 

-Even does Income Averaging 

-Compatible with files from 
"The Home Accountant" for a 
year-around financial planner. 

Only $59.95 




Over 1000 Items 
For Your Atari! 



ATARI 



We Know ATARI 

Computers... Call 

Us For The Latest 

Info: (503)683-5361 



Protect Your 
Valuable 
Equipment 
With 



DUST COVERS 



These durable and attractive 
covers are custom fitted for 
■Atari 400,800,600XL,800XL AND 

1200XL Computers 
•Atari 410,810,1010 and 1050 

Drives and Recorders. 
■Epson MX-80 & FX-80 Printers. 
•Gemini 10 & Prowriter8510 Ptrs 
-Percom and RANA Drives 

$8.95.0. s<t^^ 

Please specify model ^. ' 



FREE 
Catalog 

With any order, or 
send $1 (refundable 
with purchase) Send us 
your name & address for 
FREE QUARTERLY 
FLYERS with SPECIALSi 

"If you don't have 
our catalog... you're 
Missing Out! " 

Contains over 
2000 items for 
your Atari! 




ATR-8000 



EXPANSION 
UNIT 



Use Your 
Credit Cards! 

We honor VISA. 
American Express. 
8. MasterCard 

24 & 48 Hour 
Shipping Is 
Available... CALL! 




This is one of ttie Most Versatile data-base 
programs available for business or home use! 



From ROYAL SOFTWARE 
48K Disk only 




Much More Than A Mailing List! 



Maintain Your Book Library 
Organize Your Record Collection 
Keep Track Of Your Recipies 
Are You A Stamp Collector? 

Let Super Mailer Plus keep track of 

all these and more! 



[li^aier iiigijirp^ i'lviled 

Our Price 

$49.95 



Vnu can accomplish ihii and mme because ol Ihe 
"User Redefineable lields"! The pioEram has many 
olhet lealures Multiple Search-Special Code MeW 
Single or Double DensttvOpeiation C'eate Sublrles 
AiilCHJelele-Prinl Labels i 2 or 3up-Prinl File 
Copy -Merge. Search Sort-8iiiH m OHicial PosI (lllicp 
Slate Abbreviations-More 



... **' w — 

• Run CP/M on your Atari • Parallel printer port 

• Printer spooler • Serial port • DD controller 

Plus Freight 

16K model 299.00 

64K model (for CP/M) 499.00 

2-DDDS Drives (for 64k model] 695.00 

|!^^ AXIOM Interface 
Iw^For Parallel Printers 

Works with all Atari Computers, including 
the new XL series! Can be 
"Daisy- Chained" anywhere $99.00 
In the system. 

>!? $54.00 

The 

Monkey 
Wrench II 

A cartridge for the right-hand 
Slot of your Atari 8001 

Tins IS a BASIC & Machine-la-iguage 
Programmers Aid lor the 800 it plugs mio the 
righi sioi snd works wiin Aran BASIC to add 16 
new direct-mode commanasdncl Auto Ime 
numbering Delete lines Renumber BASIC Hex- 
Dec conv Find siring Move lines Exchange 
siring Dtsk direclorv irom BASIC Mem test 
More 1 Also includes a moniior wnn 15 
commands to mieract wiIM tne 6502 This has 
been proven lo be a very helD'ul tool when wnima 
your own programs' 




AU-TIME FAVORITES 

Star Raiders(C) 38.20 

Eastern Front (D.T) 2') 95 

Pacman (C) 39.50 

Temple of Apshi (D.T) 35.10 

Zork I. II, or III (D) each 35.10 

Defender (C) 39,50 

Missle Command (C) 29.70 

Shamus (D,T) 31.50 

Gtiost Hunter (D) 34.95 

Gtiost Hunter (T) 29.95 

TOP-TEN PROGRAMS 

Pole Position (C) 44 90 

Donliey Kong (C) 44 90 

Blue Max (O.T) 31 50 

Baseball (D.T) , 28 90 

Pinball Construction Set (48K, Disli) 35.10 

Football (D,ri 28 90 

Monkey Wrencii II (noi a game) (C), 54 00 

Ultima II (0) . 52 50 

Archon (D) , 35 10 

Ultima Ill/Exodus (D) 49,50 



rLlurIT FromSublogIc 48K Disk 

SIMULATOR II $44.90 




Colorful, scrolling graphics-Full instrumentation 

The program includes a World War I "Air-Ace" battle game, tool 



ULTIMA Ill/Exodus 
$49.50 




From Origin Systems 

Here is the latest 
in tlie famous series 
of fantasy/role- 
playing adventure games. 



SUPER SPECIALS-UP TO 60% OFF! 



'CQMPUTEII 
PALACE 




HARDWARE 

Astra 1620 Disk Drive 539.00 

Koala Pad Graptiics Tablet 87.00 

Rana 1000 Disk Drive 349.00 

Trak A2-D2 Disk Drive 398.00 

Super-5 Printer 329.00 

Panasonic Monitor(Grn/Scrn, w/soumDl 99.00 

SOFTWARE 

Arction (O.T) 35.10 

loust (C) 44.90 

Robotron (C) 39.50 

Microsoft Basic II (D) 79.10 

Diskey Utility (D) 44.90 

Quasimodo (D.T) 31,50 

lurder on ttie Zinderneuf (D) 35.10 

Blue Max (D.T) 31.50 

Odessa Chess (D) 59.50 

Ptiaroah's Pyramid (D) 31.50 

Rally Speedway (C) 44.90 

Ultima II (D)'. 52.50 

B/Graph (D) 89.90 

Ttie Home Accountant (D) 69.50 



OPEN Monday - Saturday, 9 to 6 4===^ ^ 
2160 W. 11 tin Avenue Eugene, Oregon 97402) 




USE YOU CREDIT CARD & CALL TOLL-FREE 1-800-452-8013 

You Never Pay Extra To Use You Credit Card At Computer Palace! 

Our Toll-Free Number Is For ORDERS ONLY. PLEASE! Call 503-683-5361 for info. 

stripping Note: UPS & Parcel Post, Add $2.90-UPS Blue Label (Air), Add $4,75-Hardware and Paper Supplies are 
Extra-Call for exact cost on your order, 24 & 48 liour sliipping available— Call 503-683-5361 for Information. 



HAPPY WINS THE RACE WITH WARP DRIVE SPEED! 





o 



HAPPY 810 ENHANCEMENT 

• The only change needed to run all WARP DRIVE software 
Plug in P.O. board requires no permanent modifications 

• Proven reliable in thousands of installations, reduces disk drive wear i 

• Comes completely assembled and tested, just plug in and use 

• Full one year parts and labor guarantee, compatible with existing software 

• High quality printed circuit board with gold connectors 

NO ONE ELSE HAS THIS PERFORMANCE \^-' / -j. 

Unenhanced whole disk (ATARI rev B format) read time; 112 seconds ^~^ 

Unenhanced whole disk (ATARI rev C fast format) read time: 89 seconds 

ENHANCED 810 whole disk (any format) read time with standard software: 68 seconds 
ENHANCED 810 whole disk (any format) read time with WARP DRIVE software: 43 seconds 
Standard software whole disk write and verify time: 238 seconds 
WARP DRIVE software whole disk write and verify time: 62 seconds -^ 

NEW HAPPY WARP DRIVE SOFTWARE 

6 

WARP SPEED HAPPY BACKUP PROGRAM 

• Completely automatic: nothing to figure out, insert disks and press return 

• Only program on the market guaranteed to backup any disk 

• Can write to a blank disk: format write and verify in one operation .- ^ , 

• Automatic program tracing: copies only the tracks that are used 

• Efficient memory utilization: reduces the number of disk insertions 

• Requires only one ENHANCED disk drive, backups will work on a standard drive 
WARP SPEED MULTI DRIVE HAPPY BACKUP PROGRAM 

• Same features as above plus support of multiple ENHANCED drives 

• Can be used with up to 4 ENHANCED drives 

• Source and all destination drives read and write in parallel 

• Format write and verify 3 complete disks in less than 3 minutes 
WARP SPEED HAPPY COMPACTOR PROGRAM 

• Reduces the number of disks required to backup your library 

• Combines up to 8 self booting disks into 1 disk with a menu 

• Compacted disks run only on an ENHANCED drive 

• Pays for itself by saving on disks 

• Single or dual ENHANCED drive operation 
HAPPY WARP DRIVE DOS 

• Improves ATARI DOS 2.0S to use warp speed reading and write with verify 

• Use all features of BASIC, PILOT, FMS, and DUP at top warp speed 

• Warp speed I/O software module available separate from DOS 
HAPPY WARP DRIVE SECTOR COPY PROGRAM 

• Standard format whole disk read, write and verify in 105 seconds 

• Use with sngle or dual drives, mix ENHANCED and NON-ENHANCED drives 
HAPPY CUSTOMIZER PROGRAM (sold separately $99.95) 

• Creates custom format disks of any specification 

• Any type bad sector, duplicate sector numbers, or interleave 

• Easy to use but requires an advanced level user to interpret the results 

REVIEWED IN POPULAR MAGAZINES 

A.N.A.LO.G. COMPUTING— July/August 1 983 "...The installation instructions tor tlie Happy 810 Entiancemert are among tlie best I have ever seen ...The Happy 

810 Enhancement is one of the most powerful hardware moditications available to ATARI computer owners." 

ANTIC— July 1 983 "The difference between a normal ATARI 810 disk drive and one equipped with Happy is like the contrast between mass transit and the 

automobile. A car costs you more initially but improves the quality of your tile. Similarly, it you use your disk drive a lot, installing Happy will markedly enhance your 

programming lite." 

SPECIAL SUGGESTED RETAIL PRICE BEFORE FEBRUARY 28, 1984: Ge( the HAPPY 810 ENHANCEMENT with the single and multi drive HAPPY BACKUP 

PROGRAM, plus the HAPPY COMPACTOR PROGRAM, plus the HAPPY DRIVE DOS, plus the HAPPY SECTOR COPY, all with WARP DRIVE speed including our 

diagnostic for $249.95. Existing registered ENHANCEMENT owners may upgrade to WARP DRIVE speed lor $15.00 with no hardware changes.! 

Price includes shipping by air mail to U.S.A. and Canada. Foreign orders add $10.00 and send an international money order payable through a U.SA bank. California 

orders add $16.25 state sales tax. Cashiers checker money order for immediate shipment from stock. Personal checks require 2-3 weeks to clear. Cash COD 

available by phone order and charges will be added. No credit card orders accepted. ENHANCEIvlENTS for other ATARI compatible drives coming soon, call for 

information. Please specify -H model for all drives purchased new after February 1 982, call for help in ENHANCEMENT model selection. Dealers now throughout 

the world, call tor the number of the dealer closest to you. atari si o is a regisiered trademark of Aiari, inc. 

HAPPY COMPUTERS, INC. • P.O. Box 1268 • Morgan Hill, California 95037 • (408)779-3830 
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SCREEN #18 



8 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 



( VFAST Vertical Line Drawing ) 

< REMEMBER: You MUST have the 

< FORTH screens -from Issue ttl6 

< [pp. 81-833 compiled into 

( your system BEFORE you LOAD 

< these screens! And don't 

< forget to repair screens 1-3 

< as shown in this month's 

< column, e i ther . ) 



ASSEMBLER 
112 
113 
114 
115 



CONSTANT 
CmSTANT 
COr-JSTANT 
C(>1STANT 



MASKB 
LEFT 
UECT 
SADDR 



SCREEN #22 
8 < MFAST Uertical Line Drawing 

2 COLORS STA, ( save XI for 

3 COLORS 1+ STY, < the OpSys 

5 XLO LEW, ( if Yl is 

6 « 192 CMP, ( greater than 

8 CS IF, 

9 NEXT JMP, 
18 ENDIF, 
11 
12 N LDA, 



— > 



13 
14 
15 



( f?2, abort 
( the UFAST 



( also be sure 
« 192 CMP ;( Y2 is within 



— > 



SCREEN «19 



SCREEN «23 



e 
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2 

3 
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13 

14 

15 



( yPAST Vertical Line Drawing ) 

( This is the assembly code for 

< VFAST. Syntax is: 

< XI Yl Y2 — 

< WHERE: 

< XI is the fixed horizontal 

< position of the line [8-3193, 
( Yl is the Y-coordinate of 

( the first end of the line you 
( want to draw [8-1913. and 

< Y2 is the Y-coordinate of the 
other end [8-1913 . ) 

--> 



8 

1 

2 

3 

4 

5 

6 

7 

8 

9 
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12 
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14 

15 



< WAST Vertical Line Drawing 



CS IF, 

NEXT 
ENDIF, 



< range; else 
JMP, ( abort UFAST 



XLO CMP, ( is Yl bigger 

( than Y2? 

CS IF, ( if so, then 

( calc the 

XLO SBC, ( difference & 

* 1 LDY, ( set drawing 

( direction to 

( "down" [13 



~> 



SCREEN #29 



SCREEN «24 
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< VFAST Vertical Line Drawing ) 

< Line color is controlled by 
( the standard ual FORTH word 

< COLOR. Legal COLOR values 

( are 8 and I. See valFORTH's 

< documentation for more info. ) 



CODE VFAST 



« 3 LDA, 
SETUP JSR, 
XSAVE STX, ( 



« DROP values > 
move i nto N ) 
preserve X ) 



OLD, ( for safety 



) 



8 

1 

2 

3 

4 

5 

6 
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< VFAST Vertical Line Drawing ) 



ELSE, 



# 
ENDIF, 



XLO 

N 
255 



LEFT 
VECT 



LDA, 
SEC, 
SBC, 
LDY, 



STA, 
STY, 



if Y2 is 
larger, then 
calc the 
difference i- 
set drawing 
direction to 
"up" [-13 



save the 
del ta and 
direct i on 
later use 



the 
for 



SCREEN #21 



SCREEN #25 



< VFAST Vertical Line Drawing 

1 

2 

3 
4 
5 
6 
-I 

8 

9 
10 
11 
12 
13 

14 ENDIF, 
15 



PT-ITR LDA, ( get Isb of XI ) 

mTR 1+ LDY, < and msb ) 

# 1 CPY, < if XI is ) 

( greater than ) 

CS IF, 

# 64 CMP, < 328, abort ) 



CS IF, 

NEXT JMP, 
ENDIF, 



( the VFAST and > 
( return to ) 
( FORTH ) 



— > 





I 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 



< VFAST Vertical Line Drawing ) 



PNTR LDA, 

PNTR 1+ LSR, 

.A ROR, 

.A LSR, 

.A LSR, 

TAY, 

PNTR LDA, 

# 7 AND, 

.A ASL, 

CLRBYT ORA, 

MASKB STA, 





fetch XI and ) 
d i V i de it by ) 
8 for use as ) 
a Y- index ) 
into the ) 
mode line ) 




now mask XI ) 
to get bi t ) 
position, ) 
superimpose ) 
COLOR data & ) 
save result ) 




— ) 
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SCREEN tt26 



SCREEN tt28 
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< UFAST Vertical Line Drawing ) 



XLO LDX, ( init Y-coord 
ROWCRS STX, ( for drawing 

< Here begins the loop that 

( actually draws the line ^^or 

< you . ) 



BEGIN, 

YLOWS ,X LDA, 

SADDR STA, 

YHIGHS ,X LDA, 

SADDR 1+ STA, 



SCREEN «27 

e ( UFAST Vertical 

1 

2 

3 MASKS LDX, ( 

4 < 

5 SADDR )Y LDA, ( 

6 ( 

7 ( 

8 NMASKS ,X AND, ( 

9 ( 
18 PMASKS ,X ORA, ( 

11 ( 

12 SADDR )Y STA, ( 

13 ( 
14 

15 



■fetch addr o-f ) 
•first byte in ) 
the mode 1 i ne ) 

— > 



Line Drawing ) 



retrieve the 




color mask 
■fetch the 




proper screen 

byte. 

zero out the 

plot bit. 




super impose 
color data & 
proudly show 
the byte 





-- > 



< VFAST Vertical Line Drawing ) 



1 
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SCREEN #29 



ROWCRS 


LDA, 




update the 






(JLC, 




Y-coord -for 




VECT 


ADC, 




the next plot 




ROWCRS 


STA, 




restore table 






TAX, 




i ndex 




LEFT 


DEC, 




keep drawing 
till no more 




EQ IfJTIL, 






Y-coords left 




XSAUE 


LDX, 




restore X and 




NEXT 


JMP, 




we're done! 






c; 




— 
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< VFAST Demonstration Words 

< You remembered to compile 

< last month's screens, didn't 
( you? O^f course you did. ) 

: LINEINIT 



24 GR. 
14 789 i 
1 COLOR 
8 TOCK ! 



( graph ics mode > 

( mi t screen & ) 

( 1 ine colors ) 

( reset timers ) 



INTERFAST-I 



TM 



The Printer Interface for Your ATARr 




ONLY $169.95 



BUFFERED 
COMPATIBLE 

STANDALONE 

PROGRAMMABLE - 

EASY-TO-USE 



4K RAM buffer. 

With all Atari computers and all 
software. 

Needs no 850® Interface and no 
mods to your computer. 

Allows customization such as 
special character sets — now 
with customizer diskette. 

Connect it to the serial bus and 
a Centronics compatible printer 
-and PRINT! 



SCREEN «3e 



IMOW AVAILABLE 

SERIAL BUS MODEM ADAPTOR 




P.O. Box 2188 
Melbourne, Fl. 32902 
(305) 676-1275 



INTERFAST-I is a trademark of Advanced Inieiiace Oavicat, Inc. 

ATARI 11 a ragiiKrvd trademark of Atari. Inc. 

Atari 850 Interface Module is a regiitamd trademark of Atari, Inc. 



8 ( VFAST Demonstration Words ) 
1 

SLOWLINE ( using Atari's ) 
< CIO PLOT and DRAW ) 

LINEINIT 



2 
3 
4 
5 

6 

-> 
f 

8 

9 

18 

11 

12 

13 

14 

15 



328 8 DO 

I 8 PLOT I 191 DR. 
LOOP 



SHCWTIME 
CR : 



CIO 1 ines. 



— > 



SCREEN «31 
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8 < VFAST Demonstration Words 
1 

FASTLINE ( using our new ) 
( word VFAST ) 

LINEINIT 

PLOTSETUP ( don't forget! ) 



326 8 DO 

I 8 191 MFAST ( simple, ) 
LOOP ( eh^ ) 



SHOWTIME 
CR : 



VFAST . 



ISSUE 17 



ANALOG COMPUTING 



PAGE 53 



LODE RUNNER 

by Doug Smith 

BRODERBUND SOFTWARE 

17 Paul Drive 

San Rafael, California 94903 

48K Disk $34.95 



by Lee Pappas 



Here is proof that a video game can be entertaining 
without laser beams, bombs or explosions. 

Lode Runner centers around a highly skilled 
Galactic Commando, who is placed deep inside the 
treasure-filled catacombs of the evil Bungeling Em- 
pire. Your mission: Grab the gold. Each of the 150 
(yes, 150) levels contains several kegs of gold, which 
you must approach and recover. But Guards of Stu- 
pidity are patrolling these chambers, and they'll do 
everything they can to try and catch you. 

Each level is made up of brick walkways, ladders, 
hand over hand bars, gold, guards and you. You have 
the ability to run, jump down, climb, drill holes and 
die. The guards can do all of these, except drill and 
die. 

What's going on. 

A level may contain from two to five guards. 
They'll jump, climb and run to either where you are, 
or where they think you are going. It's not that 
they're particularly bright; I think it's blind luck. 
You'll catch them doing some funny things, some- 
times resembling the Keystone Kops. 

You appear as a little-bigger-than-a-stick figure 
standing on a blue platform. The platforms can be 
composed of brick, which you can drill through, or 
solid rock, which is impervious to your laser drill. 
Trapping the guards is usually accomplished by dril- 
ling a pit and forcing the guards to fall in. After a few 
seconds, though, the guard can climb out, so you 
must either time your moves so he gets buried (pits 
fill in after 10 seconds), or dig several pits. 

Anytime a guard gets buried, another will take his 
place, usually appearing near the top of the screen. 
This can work against you, but if you're a skilled 
player you'll often be grateful for it. If you manage to 
get close to level 30, you'll see gold you can't reach or 
climb to by yourself. By letting the guards pick up the 
gold (they do this quite a bit), they may bring it to a 
point accessible to you. You can steal the gold from a 
guard by making him fall into a pit, then walking on 
his head until he gives up the loot. 

To make things even trickier for you and the 
guards, trap doors will drop anyone who walks over 
them, and undiggable floors may be the death of you, 
offering no protection from guards on the same level. 
Only when you retrieve all of the gold on a level 
(including what the guards are carrying) will an escape 
ladder appear for your getaway. 



Options. 
Lode Runner gives you a choice of either key- 
board or (preferably) joystick control. The ESC key 
will pause/resume the game whenever you need a 
break. Occasionally, you may get trapped or stuck 
with no way out. When that happens, pressing 
CTRL — "A" will abort the round and start you 
back at the beginning, but you'll forfeit a life. The left 
and right cursor keys slow down or speed up the 
game speed respectively, and CTRL — "D" actuates 
forward or backward drilling. 

My favorite buttons are CTRL keys "U" and "R" 
These allow you to cheat by adding extra lives (up to 
999) and allowing you to proceed manually through 
the levels without having to play each one through, 
although the computer still has to load each screen 
off the disk in sequence. The price for this immoral- 
ity is the inability to record your high-score on the 
disk. 

The sound effects, animation, color and graphics 
in Lode Runner are only marginal, but I'm not too 
upset about it. I'm fed up with all this talk of hi-res 
graphics and bla-bla-bla. Lode Runner is game play, 
with graphics and sound to support it. This is a 
welcome relief from "games" like Astro Chase, 
which are little more than graphics showcases. 

Lode Runner is more than just action, though. 
Strategy and tactics are all-important, and there'll be 
times when thought alone will get you that last keg of 
gold or save your hide. 

By now, it's obvious I find little fault with the 
game, but the next feature is strictly frosting on the 
cake. 

If you don't like it. . . 

After 150 screens, I can't imagine anyone getting 
bored with Lode Runner, but let's suppose for the 
sake of argument that the game is too tough or too 
easy, or you're tired of cheating. A well-designed 
option allows you to literally create your own Lode 
Runner screens and save them on disk. 

Lode Runner's screen editor lets you enter in the 
level number you want it to be, how many guards will 
chase you, and even where the escape ladders should 
go. Gold, brick, trapdoors, hand bars and everything 
else can be placed by you. After saving your new 
design on disk, you can immediately play the screen 
to see if it's OK, or recall it for further editing. 
Screens can be created and played in just minutes, 
and the game automatically handles all of the logistics 
of guys running around, falling and dying. 

Even without this incredible option. Lode Run- 
ner would be another real winner from Broderbund. 
Author Doug Smith should be congratulated for 
coming up with a terrific piece of entertainment 
software. D 
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HOW TO LIVE 
WITHOUT 

DOS 



16K Disk 



by Dan Higgins 



Anyone with an Atari disk drive probably uses a 
disk operating system (such as Atari DOS 2. OS) for 
communicating with the drive and controlling disk 
operation. Did you know, however, that you don't 
really need DOS to input or output information to 
or from your disk? This article describes a method 
for disk input/output that is independent of DOS. 
Don't throw away your DOS disks, however! DOS is 
still a very useful tool, even if not an absolute 
necessity. 

First consider a typical single-density Atari disk. 
When the disk is formatted, it has 720 data sectors 
available, each of which can hold 128 bytes of infor- 
mation. Multiplying the number of sectors by the 
number of bytes per sector gives a total of 92,160 
bytes per disk. Atari DOS uses some of this space for 
its own purposes, however, so that the user can store 
only about 88,000 bytes of data with DOS. For 
example, sector 360 (decimal) is used by DOS to 
store the Volume Table of Contents (VTOC). This 
VTOC sector contains a bit map which DOS uses to 
keep track of which sectors are in use. 

Sectors 361 to 368 contain the DOS disk direc- 
tory, which keeps a record of what files are on the 
disk. Also, DOS 2. OS has a bug in it that makes it 
unable to access sector 720. There are thus 10 sec- 
tors which cannot be used to store data when operat- 
ing under DOS. In addition, one can only store 125 
bytes in each of the remaining sectors. The last three 
bytes of each sector are used by DOS to keep track of 
what sector to go to next (i.e.; what sector has the 
next part of the file). 



Note that when using DOS, you never have to even 

think about sector numbers. You simply give DOS a 
filename and it finds the appropriate sectors for you. 
This is very convenient, but it does require some 
disk space and if anything goes wrong with the disk 
directory (for example) you may be unable to access 
an entire file. 

It is possible, however, to read or write any sector 
on the disk by simply using a few subroutines built 
into the Atari operating system. Listing 1 is a short 
assembly language program, designed for use in a 
BASIC USR function, which shows how to do this. 
One simply sets a few parameters in the Device 
Control Block (DCB) and then jumps to the appro- 
priate subroutine in ROM. Listing 2 is a self- 
documented BASIC program illustrating the use of 
this USR function. A complete description of the 
device control block and its operation would be 
quite long. Anyone interested in further details 
should refer to Atari's Operating System Manual or 
"Outpost Atari" in Creative Computing, May 1982. 

Warning! 

Be very careful if you write sectors directly to a 
DOS disk. It is easy to make a mistake and change a 
sector in the middle of a file. DOS may then no 
longer be able to read the file. The one sector you 
don't have to worry about is sector 720 (since DOS 
cannot access it). 

You may wonder why anyone would want to avoid 
using DOS and read or write specific disk sectors 
instead. I will list a few reasons below, and I am sure 
that you will think of many other possibilities. 
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1) Repair or recover damaged DOS files. 

2) Write a sector-by-sector disk copying program. 
Note that the DOS disk copy command ("H") does 
not copy every sector. It only copies those sectors 
which the VTOC says are in use. If your VTOC is 
incorrect, DOS will not properly copy the disk. 
(Note that a simple sector copying program will not 
duplicate most commercially protected disks.) 

3] Give your DOS disks a name. Because sector 
720 is unused by DOS, you can use it in a program to 
give each disk a unique identifying code. You could 
store up to 128 characters in that sector when writing 
a data disk, and then check it later when reading the 
disk to see if the correct disk is in the drive. 

4) Pack more data on a disk. As previously noted, 
DOS uses some disk sectors for its c:)wn bookkeeping 
purposes. By ignoring DOS, you can use these sec- 
tors for your purposes. 

5) Move disk data directly to a desired location in 
memory. Remember that our USR function requires 
a parameter identifying an address in memory. Data 
is moved directly to or from that location. This can 
be useful in storing or retrieving high-resolution 
grajihics data. Ft:>r example, data can be moved 
directly from the disk to the screen memory location 
or vice- versa. 

6) Use direct sector I/O to write a disk-based 
virtual memory system to extend apparent machine 
memory. This is a scheme used in various FORTH 
languages that have been implemented on the Atari. 

7) If you are really ambitious, you can even write 
yoLir t)wn disk operating system! D 





Listing 1. 


eiee 


; HOW TO LI'JE WITHOUT DOS 


ens 


; BY DrtN HIGGINS 




ei2e 


; ANALOG COMPUTING il7 


8138 






8148 


■ ASSEMBLY SOURCE CODE FOR USR FUNCTION 


8158 


icB = i8388 : 




8168 


ADOR OF DBJICE CONTROL BLOCK 


8178 DSKIW = *E453 ; 


OS ROUTINE TO RM SECTORS 


8188 


J 




8198 


*= $8688 ; 


COULD GO ^WrWHERE 


8288 


I 




8218 


PW ; 


1 OF AR6UHENTS 


8228 


PLA J 


HIGH BYTE OF BUFFER ADDR 


8238 


STA DCB+5 




8248 


PLA 


LOW BYTE OF BUFFER ADDR 


8256 


STA DCB+4 




8268 


PLA , 


HIGH BYTE OF SECTOR « 


8278 


STA DCB+11 




8288 


PLA ; 


LOW BYTE OF SECTOR « 


8298 


STA OCB+18 




8388 


PLA ; 


HIGH BYTE OF RAi FLAG 


8318 


PW i 


LOW BYTE OF RAi FLAG 


8328 


CMP 11 ; 


IS IT A 1? 


8338 


6NE READSEC ; 


NO, SO READ A SECTOR 


8348 


LDA #$57 ; 


OS "WRITE SECTOR" COMMAND 


8358 


STA DCB+2 




8368 


BNE CONTINUE 




8378 READSEC 




8388 


LDA »52 ; 


OS "RB^D SECTOR" COrtWND 


8398 


STA DCB+2 




8488 CONTINUE 





8418 
6428 
8438 
8448 
8458 
8468 



LDA «1 
STA DCB+1 
JSR 5SKIW 
RTS 

.B4D 



; ORIUE il 

i PASS CONTROL TO OS 
; THEN RETURN TO BASIC 



Listing 2. 



ISO 


RFM 


» 


lie 


REM 


« 


120 


REM 


# 


136 


REM 


« 


140 


REM 


« 


150 


REM 


« 


160 


REM 


# 


170 


HEM 


* 


180 


REM 


# 


190 


REM 


» 


200 


REM 


» 


210 


REM 


# 


220 


REM 


* 


230 


REM 


» 


240 


REM 


« 


250 


REM 


* 


260 


REM 


« 


270 


REM 


* 


280 


REM 


« 


290 


REM 


« 


300 


REM 


* 


310 


REM 


* 



HOW TO I TUF WITHOUT l>ns 
BV DON HIGGINS 
GNOLOG COMPUTTHG ttl7 

THI5 50MPLE PROGRAM WILL 
SHOW VOli HOW TO REOD OR 
WRITE DISK SECTORS WITHOUT 
GOING THROUGH DOS. 

BOSIC USR FUNCTION IS 
USED TO REiflD OR WRITE ONE 
DISK SECTOR AT A TIME 

FORM OF THE USR CULL IS: 

IO=USRCODDR, BUFF, SECT, FLOG) 

SVNTflK; 

10 - DUMMY UORIOBLE 
ODOR = 0DDRE55 OF THE 
M/L SUBROUTINE 



(Listing 2. continued next page.) 



PRECISION SOFTWARE TOOLS 



Only one company can offer you 

' the best and most complete pro 

gramming languages for use with 

I computers produced by Atari, 

Inc. Whether you are just begin 

ning or an advanced programmer, 

learn why you should use 

ACriONr". BASIC XV, MAC/dT", 

^ or C/6T'' . Call or write for a 

f> brochure and receive 

li ^ a free BASIC 

I reference card. 



-.rl 






WHWl/lu) 




Oll'JSIBSiMIH 



rf&m^^^^^^^^KBSjl^Sfw^^i^^^ 
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3?« 
330 
340 
358 
36fl 
370 
?80 
3^0 
400 
4t0 
4?e 
430 
440 
450 
460 
470 
480 
4^0 
500 
RiO 
520 
530 
540 
550 
560 
570 
580 
5^0 
600 
610 

6?0 
630 
640 
650 
660 



fiOOfiESS OF l?8-0YTE 
5ECT0R BUFFER 
SECTOR NUMBER TO 
OCCESS tl-?Z0J 
I/O DIRECTION FLOG 
Flfli6 = TO READ 
FLfl6=J TO WRITE 



REM * BUFF 

HEM » 

REM » SECT 

REM * 

REM « FLOG 

REM # 

REM « 

REM # 

REM » FTR5T WE MOME THE MOCHIHE 

REM * LONGUOGE SUBROUTINE INTO 

REM * STRING CSECRWSl 

REM » 

DIM SECRWSf44) 

FOR T = .l TO 44 

REOD K 

SECRM$tTJ=CHRSt)0 

NEKT T 

REM » 

REM « NOW WE RESERVE 178-BVTE 

REM « BUFFER OREO TO HOLD THE 

REM * SECTOR OOTO 

REM * 

DIM BUFS(1Z8) 

REM # 

REM « THE FOLLOWING LINES MILL 

REM » WRITE THE CONTENTS OF BUFS 

REM » TO DISK SECTOR 720 

REM « 

BUF$ = "TE5TIN6 .12 3 4" 

IO = USR CODR (SECRWSJ , ODR CBUF5J , 720 , t 

BUF$=" 

PRINT BUFS: REM » BUFS CLEORED 

REM » 

REM » NOW WE'LL REOD SECTOR 720 

REM * BOCK INTO BUFS 



670 

680 

) 

690 

700 

710 

720 

730 

740 

750 

04 

760 

,201 

770 

780 

790 



REM » 

IO=USR CODR {SECRWS5 , ODR tBUFS) ,720,0 

PRINT BUFS; REM » BUFS RESTORED ' 

END 

REM * 

REM # DOTO FOR MOCHINE LONGUOGE 

REM * SUBROUTINE CSEE I ISTING 1) 

REM # 

DOTO 104,104,141,5,3,104,141,4,3,1 

DOTO 141,11,3,104,141,10,3,104,104 

DOTO 1,208,7,169,87,141,2,3,208,5 
DOTO 169,82,141,2,3,169,1,141,1,3 
DOTO 32,83,228,96 



CHECKSUM DATA 
(see p. 15) 



too DOTO 558,175 
295,506,568,358, 
250 DOTO 111,291 
29,656,551,567,5 
400 DOTO 744,31, 
4,758,304,468,40 
550 DOTO 294,988 
,347,293,343,217 
700 DOTO 38,286, 
2,274,591,4487 



,993,280,1,455,170,66, 

279,715,285,5704 

,364,297,228,243,984,6 

31,790,782.302,7326 

557,286,336,150,700,88 

4,907,288,50,6867 

,854,919,306,91,88,247 

,302,106,541,5936 

735,927,295,493,526,32 



Double Byte 



Send To: 



Why pay more for double-sided disks when you 
can use both sides of a single-sided disk. How? 
With OVERBYTE! 

OVERBYTE is a self-aligning, heavy duty metal hold 
punch which doubles the capacity of a normal single- 
sided disk. 

OVERBYTE punches a write-protect notch on the left 
side of a single-sided disk allowing the reverse side 
to be used. 

OVERBYTE can be used with Apple, Rana, Franklin, 
Atari, Commodore, and Victor 9000 disk drives 
(and other compatible drives). 

Disks are expensive. 
Double your memory 
at half the cost! 



OVERBYTE 
ONLY $19.95 





OVEWBYTE) 



8621 Laurel Canyon Blvd. 

Sun Valley, CA 91352 

(213)504-0309 

Please rush me OVERBYTE for $1 9.95 

Please include $3.00 for shipping & handling (California 
residents add 6'/2% sales tax.) 

NAME . 



AnnRFSs 


niTY 


STATE 


7IP 


PHONE ( I 




D MASTERCARD 
D MONEY ORDER 


D VISA 


D CHECK 


CREDIT CARD NUMRFR 


EXPIRATION DATE 


SIGNATURE (for charge car 


ds) 








JL ATAPI w^ Printers/Etc 

^ ■ ^ MM I #ml% I GEMINI 10X . . $279 PROWRITER . 



600XL CALL 



GEMINMOX 
GORILLA 



$279 
$199 



1200XL 



1050 DRIVE $335 

1025 PRINTER $399 

1020 COLOR PTR ... $219 

1027 PRINTER $279 

1010 RECORDER $72 

MICRO PERIF. MODEM/INFC 

DRIVES 

ASTRA 1620 $469 

RANA1000 $295 

PERCOM 88-S1 $298 

PERCOM 40-S1 $418 

PERCOM 40-S2 $718 

PERCOM 44-S1 $510 

PERCOM 44-S2 S929 



CALL* 

'Reflects $100 Atari Rebate 
MICROBITS INFC ... $78 
80 COLUMN BD .... $249 
TECHNICAL NOTES... $25 

REAL TIME CLK $38 

AXIOM PRINTER INFC $80 

$129 

MEMORIES 
48K RAM (INTEC) .... $95 
64K RAM (INTEC) ... $119 
48K RAM (MOSAIC) . $109 
64K RAM (MOSAIC) . . $145 
128K RAM DISK .... $299 
32K RAM (MOSAIC). . $68 



ATARI SOFTWARE 



ADVENTURE INT'L 

Adv. 1-12 each (C) $18 

Preppie(C/D) $20 

PreppieM(C;D) $23 

Diskey(D) $33 

Sea Dragon (C/D) .... $23 

Bug Off! (C;D) $20 

Tutti-Frutti (C/D) $17 

Saga 1-3 (ea.)(D) $27 

Lunar Lndr . (C)$11(D)$15 
Galactic Empire (C) ..$14 
Gaiactic Trader (C) ... $14 

Stratos(C/D) $23 

RearGuard (C)$14(D)$17 

APX 

Eastern Front (C/0) . . $23 

747 Land Sim. (C/D) . . $17 

Fig-Forth (C) $30 

Family Cash Fiow(D) .$17 

Downhill (C/D) $17 

Avalanche (C/D) $17 

Outlaw/Howitzer (C/D) $17 

Salmon Run (C/D) $17 

Datafvlanagement(D) $17 
Galahad/Holy Grail (D) $21 
Adv. tvlusic System (D) $21 
ATARI INC. 

Microsoft Basic II (R) . $62 
f^ickey in Great 

Outdoors (C/D) .... $36 

Paint (D) $30 

Speed Reading (C) ... $54 

Qix (R) $30 

Dig Dug (R) $30 

Atari Writer (R) $68 

Time Wise (D) $23 

Visicalc(D) $139 

Juggles House (C/D) .$22 
Juggles Rnbw (C/D) . . $22 

Pilot (Home) (R) $55 

Galaxian (R) $30 

Defender (R) $30 

ET $34 

Microsoft Basic (D) . . $62 
Macro Ass. & Edit (D) . $62 
Assembler Editor (R) .$42 
Basic Cartridge (R) ... $45 

Pac Man (R) $30 

Centipede (R) $30 

Caverns of Mars(D) . , $28 

Star Raiders (R) $30 

Conv. Lang. Ea. (C) ... $42 
Music Composer (R) . . $31 
Super Breakout (R) ... $26 
My First Alphabet (D) . $26 
Prog.2&E(ea.)(C) .... $21 
Word Processor (D) .$102 

Pilot (Educ.)(R) $92 

Touch Typing (C) $19 

Home File Mngr(O) .. $36 

Bookkeeper (D) $102 

Family Finance (D) ... $35 

Prog. 1 (C) $18 

Scram (C) $18 

Asteroids (R) $27 

Space Invaders (R) ... $27 
Missile Command (R) . $27 

Telelink(R) $21 

Superman III (R) $34 

Basketball (R) $24 

Donkey Kong (R) $34 

AVALON HILL 

VC(D) $17 

B-1 Nuc. Bomber (C) .. $12 

Legionnaire (C) $23 

Empire of Overmind 

(D) $23 (C) $20 

Tanktics ... (D)$20(C)$17 
ComptrStock & Bonds ... 

(D)$17(C)$14 

Dnieper River Line (D) $20 

\/oyager{D) $17 

Controller(D) $20 

GFS Sorceress 

(D) $23 (C) $20 

Telegard . . (D)$19(C)$16 

Vorrak (D) $18 

Lord of Karma (C) .... $14 



AVALON HILL(Cont'd) 

Moon Patrol (C) $17 

Planet Miners (C) $12 

Conflict 2500 (C) $12 

Space Station Zulu 

(D)$17(C)$14 

Flying Ace . (D)$21 (C)$18 

Gypsy (D)$18(C)$15 

Galaxy .... (0)$17(C)$14 
Gunsof FortDef. (C) . $14 

NukeWar(C) $12 

Andromeda Conquest ... 

(D)$16(C)$13 

Close Assit (D)$23(C)$20 
BRODERBUND 

Sky Blazer (D) $22 

Bank St. Writer (D) ... $46 

A.E. (D) $23 

Arcade Machine (D) . . $39 
Choplifter . (D)$23(R)$29 

Labyrinth (C/D) $20 

Serpentine . (D)$23(R)$27 
Stelier Shuttle (C/D) . . $17 
Apple Panic (C/D) .... $20 
Genetic Drift (C/D) ... $20 
David's Midnight (D) .. $23 

Sea Fox (D) $20 

Track Attack (D) $20 

OperatnWhrlvimd(D) . $23 
Match Boxes (C/D) . . •. $20 
CDY CONSULTING 

Pogoman (C/D) $27 

Mad-Netter(C;D) $23 

it-ls-Balloon(C/D) $23 

CBS 

Mountain King (R) ... $27 

Boulders & Bombs (R) $27 

Krazy(each)(R) $27 

CONTINENTAL SOFT. 
Home Accountant (D) $48 
Tax Advantage (D) ... $39 
DATA MOST 

Pig Pen (D) $20 

Mating Zone (D) $20 

Roundabout (D) $20 

Bilestoad(D) $20 

Night Raiders (D) .... $20 
Monster Smash (D) . . . $20 
DATASOFT 

Text Wizard (D) $65 

Graphic Master (D) ... $27 

Micro Painter (0) $23 

Lisp Interpreter (D) ...$79 

Graphics Gen.(D) $17 

Basic Compiler (D) ..,$65 

Zaxxon (C/D) $27 

Teietalk(D) $34 

Pac. Coast Hwy (C/D) . $20 
Clowns/Balloons (C/D) $20 

Spell Wizard (D) $53 

Canyon Climber(C/D) $20 
Sands of Egypt (D) ... $27 
O'Riiey's Mine (C/D) .. $23 
Rosen's Brigade (C/D) $23 

Moon Shuttle (D) $27 

DON'T ASK 

Sam(D) $39 

P.M. Animator(D) .... $23 

Teletari (D) $27 

Poker Sam (D) $17 

Word Race . (D)$17(C)$14 
EDU-WARE 

Prisoner 11(D) $27 

Spelling Bee (D) $27 

Rendevous (D) $27 

Compu/Read 

(D)$21 (C)$15 

Compu/Math-FR 

(D) $27 (C) $21 

Compu/Math-Dec 

(D)$27(C)$21 

EDUCATIONAL SOFT. 
Tricky Tutorial 

1,2,3or4(C/D) $15 

Tricky Tutorial 

5,6 or 7 (C/D) $22 



CITOH 

Prowriter $345 

Prowriterll $629 

StarvKriter $1149 

Printmaster $1448 

NEC 

8023 AC $409 

3510 $1375 

3530 $1579 

3550 $1779 

7710/7730 $1998 



PROWRITER . $345 
SMITH TPI ... $488 

SILVER REED P .... $669 

QUME11/40+ $1299 

OKI-DATA 

Microllne82A 

Microline83A _i 

Microiine84P ^ 

Microline92 o 

Microline93 

DIABLO 

620R $939 

630R $1719 



^'^flSTfifl 1620 

DISK DRIVE SYSTEM 

MORE FOR YOUR MONEY 

DOUBLE OR SINGLE DENSITY 

TWO DRIVES 




MONITORS 



AMDEK 

Color I $289 

V300 $139 

V300A $149 

Color II $449 



NEC 

GRN(JB1260) $115 

GRN(JB1201) $155 

Color Composite ...$298 
RGB Color $598 



MODEMS 



HAYES 

Smartmodem $209 

Smartmodem 1200 . . $498 
Micromodem II $259 



NOVATION 

J-Cat $99 

Apple Cat II $259 

D-Cat $149 

ANCHOR AUTOMATION 
Mark I or II Modem ... $78 



4^^^ 




SPECIALS 

Gemini 15X Printer $399 

Axiom AT-100 Prlnter(v/itti interface $229 

Astra Double Density Dual Drive $469 

Rana 1000 Drive $319 

Bit-3 80 Column Board $245 

Mannesmann Talley 160L Printer $589 

Atari 400 Keyboard (In Home) $35 

Programmer Kit ,,$48 Entertainer Kit .,.$64 
Wico Joystick . , , $23 WIco Trackball , , , $49 

COSMIC 
COMPUTERS 

UNLIMITED 

727 BREA CANYON RD., SUITE 16 
WALNUT, CA 91789 

ORDER LINES OPEN MON-SAT 8 am - 8 pm 

(800) 626-7642 

PLEASE FOR ORDERS ONLY 
SORRY, NO COD'S 

(714) 594-5204 

FOR TECHNICAL INFO, ORDER INQUIRIES, 

OR FOR CALIFORNIA ORDERS 

Add $250 shipping per software order in continental U.S. Add $5.00 
shipping per software order tor AK, HI, FPO-APO. Add $10.00 or 15% 
(whichever is greater) per software order for non-U. S. Call for cost of 
hardware shipping. Calif, residents add 6'/2% sales tax. Cashiers 
checks or money orders filled within 24 hours for items in stock. 
Personal checks require 4 weeks to clear. MasterCard and Visa OK for 
software only within continental U.S., add 3% surcharge. Include card 
no., expiration date and signature. Due to our low prices, all sales are 
final. All defective returns must have a return authorization number. 
Please call to obtain one before returning goods tor replacement or 
repair. Prices & availability subject to change. 



SPECIAL $469 



EPYXAUTO. SIMULATION 

Rescue at Rigel (C/D) . $20 
Datestones/Ryn(C/D) $14 
UprRchs Apshai(C/D) $14 

Ricochet (C/D) $14 

Keys/Acheron (C/D) ..$14 
Curse of Ra (C/D) .... $14 
Danger/Drindisti(G/D) $14 

Jumpman(C/D) $27 

Escp Vulcans isie(D) . $20 
Crypt of Undead (D) .. $20 

Nigtitmare(D) $20 

Armor Assauit(D) .... $27 
Monster Maze (R) .... $27 

Alien Garden (R) $27 

Plattermarna (R) $27 

Morloc'sTower(C) . . . $14 
King Arttiur's Heir 

(D)$20(C)$14 

HeilfireWarrior(G/D) . $27 
invasion Orion (C/D) .. $17 
Temple of Aps. (C/D) .$27 

Star Warrior (C/D) $27 

Dragon's Eye (D) $20 

Crusfi Crumble (C/D) .$20 
GEBELLI 

Firebird (R) $27 

Embargo (R) $30 

Candy Factory (D) $20 

Match Racers (C/D) . . $20 

Dr. Goodcode(D) $20 

HAYDEN 

Go (D) $23 (C) $20 

Sargonll . . (D)$23(C)$20 
Bulldog Pinball(C) ... $20 
HES 

Coco (C/D) $34 

Coco II (C/D) $27 

INFOCOM 

Suspended (D) $34 

Zorkl,llorlli(D) $27 

Starcross(D) $27 

Deadline(D) $34 

Witness (D) $34 

INHOIME 

Baseball . . (R)$23(D)$23 

Crypts of Terror 

(D) $23 (C) $20 

INNOVATIVE DESIGN 

Pool 1.5(D) $23 

Juggier(D) $20 

Speedway Blast 

(D)$20(R)$27 

Pool 400 (R) $27 

JV SOFTWARE 

Jrny to Pints (C/D) .... $20 

Action Quest (C/D) ... $20 

Ghost Encount. (C/D) . $20 

UK 

Letter Perfect (D) ...$104 

Data Perfect (D) $74 

Letter Perfect (R) . . . $137 

Edit 6502 (R) $137 

MONARCH DATA SYS. 

ABCCompiler(D) $48 

ODESTA 

Chess (D) $45 

Checkers (D) $34 

Odin(D) $34 

OPTIMIZED SYSTEMS 

C-65(D) $58 

Bug-65 (D) $23 

Max-65(D) $58 

Basic A + (D) $58 

Action (D) $65 

Speed Read Plus (D) . . $40 

PHOENIX 

Birth of Phoenix (D) . . $16 

Adv. In Time (D) $20 

QUALITY 

Fastgammon (C) $14 

Name That Song 

(D)$13(C)$11 

Starbase Hyperion 

(D) $17(0) $14 

AliBaba/40Thvs(D) .. $20 
Jeeper Creepers (D) . . $20 
ROKLAN 

Gorf (D)$27(R)$30 

WizardArt/or . (D)$27(R)$30 
DIx Invaders (D)$23(R)$27 
AntiSubPtrl (D)$20(C)$14 

Telecom (D) $49 

Space Journey (R) ... $30 
SENTIENT 

Gold Rush (D) $23 

Cyborg (D) $23 

SIERRA ON-LINE 
Mission Asteroids (D) $17 
Ulys.&Gldn Fleece (D) $27 
Crossfire .. (D)$20(R)$23 

Mouseattack(D) $23 

Jawbreaker (D)$20(R)$23 

Threshold (D) $27 

Soft porn (D) $20 

Ultima 11(D) $39 



SIERRA ON-LINE 

Marauder (D) $23 

Lunar Leeper(D) $20 

Wiz& Princess (D) ... $22 

Frogger(C/D) $23 

SIRIUS 

Alpha Shield (R) $27 

Wavy Navy (D) $23 

Bandits (D) $23 

Space Eggs (D) $20 

Sneakers (D) $20 

Way Out (D) $27 

Type Attack (D) $27 

Repton (D) $27 

Critical Mass (D) $27 

Fast Eddy (R) $23 

Worm War (R) $23 

SPINNAKER 

Snooper Troop 1,2(0) . $30 

Kindercomp(D) $20 

Rhymes & Riddles (D) $20 
Hey Diddle Diddle (D) . $20 
Srch AmzngThngs(D) $27 

Story Machine (D) $23 

Face Maker (D) $23 

STRATEGIC SIM. 
Cosmic Balance (D) . . $27 
Cosmic Balance II (D) $27 
Tigers In Snow (C/D) .. $27 
Battle of Shiloh (C/D) . $27 
Battle of Norm. (C/D) . $27 
Cytron Masters (D) ... $27 
Knights/Desert (C/D) . $27 
Combat Leader (C/D) .$27 
SUBLOGIC 

Pinball(C/D) $20 

SWIFTY 

J. White Music Lessons 

(C/D) $20 

Space Shuttle (D) $20 

SYNAPSE SOFTWARE 

File Mngr 800 -f $65 

Protector II (D)$23(R)$29 
Shamus . . . (D)$23(R)$29 
Fort Apocalypse (C/D) $23 

Shamus II (C/D) $23 

Necromancer (C/D) .. . $23 
Pharoh's Curse (C/D) .$23 

Slime (C/D) $23 

Page 6 (D) $23 

Reptilian (C/D) $23 

Picnic Paranoia (C/D) . $23 
Claim Jumper(C/D) ..$23 

Drelbs(C/D) $23 

Shadow World (C/D) . . $23 

Survivor (C/D) $23 

T.N.T. (C/D) $23 

N.Y.C. (C/D) $23 

Slamball(C/D) $23 

Blue Max (C/D) $23 

Nautilus (C/D) $23 

Chicken (R/D) $23 

Quasimodo (C/D) $23 

River Quest (C/D) .... $23 
SYNERGISTIC 
ProgramrWkshp(D) . . $23 
Graph Workshop (D) . . $27 
Disk Workshop (D) ... $23 
Worlock's Revenge (D) $23 
THORN EMI 

Soccer (R) $34 

Jumbo Jet (R) $34 

Submarine Comm.(R) $34 

Kick Back (R) $34 

Pool (C) $22 

Humpty Dumpty(C) ..$22 
Hckry Dckry Dck (C) . . $22 

Darts (C) $22 

USA 

Atari World (D) $39 

3-DSprgrphcs(C/D) . . $27 

Survival Adv. (C/D) ... $17 

VERSA 

Mind Bggirs I (D)$14 (C)$12 

Globe Master (D) $20 

MISCELLANEOUS 
Financial Wizard (D) .. $41 
Castle Wolfenstein(D) $20 

Master Type (D) $27 

Astro Chase (D) $22 

Miner 2049er(R) $34 

Cypher Bowel (C) $33 

Bug Attack (C/D) $20 

Raster Blaster (D) $20 

Air Strike (C/D) $27 

Prism (D) $18 

Megalegs(C) $23 

Cap'n Cosmo (D) $19 

Spy's Demise (D) .... $14 
Galac. Chase (D)$20 (C)$18 

Kid Grid (C/D) $20 

Battle Trek (D) $20 

Snapper (D) $19 

T&F-PMP Property 

Management (D) .. $149 
Millionaire (D) $39 
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INTRODUCTION 

TO 
ACTION I 

Part 1. 



by Clinton Parker 



This is the first of a 2-part series that will 
introduce you to the Action! programming language, 
using a short example program that draws 
kaleidoscopic patterns on the screen. There's an old 
saying about fooling people which, unfortunately, 
holds true for trying to please people as well. The 
problem in my case is that different readers have 
different levels of experience. I hope this series will 
please all of you at least some of the time. 

Action! is a true compiled language, whereas Atari 
BASIC is an interactive interpreter. In both cases, the 
ultimate goal is to translate programs from a human- 
readable form into something that the computer can 
understand. The difference is that Action! only 
performs this translation once, whereas BASIC does 
it repeatedly. The process is similar to having a 
speech translated from German to English once and 
then reading it many times in English (Action!), as 
opposed to having someone translate the speech to 
English every time it is read (BASIC). Because 
Action! statements don't have to be translated each 
time, they execute much faster. 

Action! has three types of numeric variables 
(BYTEs, CARDinals and INTegers), which are easier 
for the computer to deal with than the floating-point 
numbers always used by Atari BASIC. This also 
contributes to faster program execution, but costs 
you in terms of flexibility (no fractions or very large 
numbers) and simplicity (you must declare variables 
so that the compiler will know what type they are). 



BYTE variables can represent numbers from to 
255. CARDs can represent numbers from to 
65535 , and INTs can represent numbers from -32768 
to 32767. Referring to Listing 1, the lines: 



CfiRD period, npts 
BYTE X0, y0, XI, yl, 
BYTE CH=764 



flTRflCT=77 



are called variable declarations. Note that the BYTE 
variable ATRACT is defined to reference location 
77 in memory, and that variable CH references 
location 764. More on these later. 

In addition to the three basic types described 
above. Action! allows ARRAYs, POINTERs and 
user-defined TYPEs (records). The following line: 

TYPE REC=CCflRD cnt, ax, bx, cx, ay , by , cy3 

is a TYPE declaration named REC, and: 

REC p, e 

is a declaration of two variables (p and e) of type 
REC. Each of these variables contain all of the 
variable fields specified in the declaration of REC. 
Fields of record variables are referenced by first 
giving the record variable name, then a '.' (period), 
followed by the field name. 
The lines: 



p. ax = 5221 
p. ay = 57669 



p.bx = 64449 
p.by = 64489 



p.CX - 3 
P.cy = 3 



are examples of assignment statements using record 
fields. 
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Action! 's assignment statements are very, very 
similar to BASIC assignments. The IF structure is 
also similar to BASIC'S, with two important 
exceptions. First, BASIC conditional statements 
must fit in the same logical line as the IF. Action! lets 
you include as many statements following the THEN 
as you like, because the compiler treats End-Of-Line 
characters the same as spaces or colons. The Action! 
keyword FI (IF spelled backwards) is used to end a 
list of statements following the corresponding 
THEN. 

Second, Action! makes it possible to execute a list 
of statements if the condition following an IF is false. 
This is done by placing the keyword ELSE where the 
FI would normally go, followed by the list of 
statements for the ELSE, and finally an FI to 
terminate the structure. ELSE is not used in Listing 
1, so don't be concerned if you don't see one. 

Action! loops are used to execute a group of 
statements repeatedly. A simple loop is specified by 
the keyword DO, followed by a list of statements 
and ending with the keyword OD (DO spelled 
backwards). The effect is similar to a group of 
BASIC statements with a GOTO <first statement> 
as the last statement in the group. You can provide 
control information to specify how many times an 
Action! loop is to be repeated. One loop control 
structure — FOR/TO — is very similar to the FOR 
structure in Atari BASIC. The differences are that, in 
Action! , the end condition is always tested before the 
statements within the loop are executed, which 
means that the loop may never be executed. BASIC 
always executes a FOR/NEXT loop at least once. 
Additionally, the STEP increment may only be 
positive in Action!, whereas BASIC allows both 
positive and negative STEPs. The other two Action! 
control structures, WHILE and UNTIL, will be 
discussed later. 

PROCedures. 

An Action! PROCedure is roughly the same as an 
Atari BASIC subroutine. One distinction is that it's 
possible to pass arguments to an Action! 
PROCedure. If you've ever called a function in 
BASIC, then you have already used argument 
passing without even realizing it. In the BASIC line: 

A=SINCX) 

X is the argument to the function call SIN(). 
The Listing 1 lines: 



MoveBIock(e, 
GenCp} 



p, REC) 



are examples of PROC calls. Note that the Action! 
compiler makes no distinction between user-defined 
PROCs and system subroutines. Thus, the PROC 
calls: 



GRaPHICS 24 

5ETC0L0R l,9,14:5ETC0L0n 2,9,8 



This gives us a nice, uniform PROCedure-calling 
mechanism, and provides an easy method for users 
to provide their own versions of system routines. 

PROCedure declarations tell the Action! compiler 
the name by which the PROC can be called, the 
arguments and variables which are unique to that 
PROC, and which statements are to be executed 
when the PROC is called. In our Listing 1 example, 
everything between: 



and 



PROC Gen (REC POINTER rJ 



PROC KalO 



Graphics(24} 
5etColorCl,8,14J 



5etColorC2,8,0J 



are similar to the BASIC statements: 



constitutes the declaration for the PROCedure 
Gen(). 

Gen() has one argument, r, which is a POINTER 
variable of type REC (a user-defined TYPE). 
The line: 

BYTE x8, ye, XI, yl, aTR6CT=77 

declares a number of local variables that are only 
used in Gen(). They can not be accessed by any 
other PROCedure in the program (Kal() in this 
case). However, the global variable period (which 
was declared at the beginning of the program) can be 
used by either PROCedure. 

The RETURN statement at the end of the 
declaration for Gen() is the same as a RETURN 
statement in BASIC, and causes execution to jump 
back to the point from which the PROCedure was 
called. The last procedure declared in a program is 
the one which will be called first when the program is 
started (Kal() in this example). If you don't quite 
follow all of this, don't worry; things should get 
clearer as we walk through the example. 

Walking through. 

As stated earlier, Listing 1 draws kaleidoscopic 
patterns on the screen. This is done by repeatedly 
calling the PROCedure Gen(). The Gen() 
statements: 

r.ax - fr.ax + r.bxJ ! r.bx 
r.ay = (r.ay + r.byJ ! r.by 

generate new values for ax and ay (fields of record r, 
passed to the Gen() PROCedure). These values are 
used to calculate xO and yO as follows: 

x8 = r.ax RSH 9 
1 y8 = r.ay RSH 9 

Without going into details about bit arithmetic and 
operations, the RSH 9 statements have the effect of 
dividing r.ax and r.ay by 512 (but do it much faster 
than a "real" divide). The reason for dividing by 512 
is to get values in the range 0-127, so that they can be 
plotted in graphics mode 24. 
The IF statement: 
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IF X8 <= ye AND y© < 96 THEM 



FI 



determines if any points are to be plotted. The check 
for yO < 96 assures that the points won't overlap 
when we calculate xl and yl: 



The first three Kal() statements: 



xl 
yl 



191 
191 



XO 

ye 



The value of 191 was chosen since it is the maximum 
y-value you can plot in graphics mode 24. 

The Plot calls following these two statements 
display all eight combinations of xO, yO, xl, and yl. 
The +64 in each call centers the display on the 
screen, since there are 128 more points in the X 
direction than there are in the Y direction. 

If you're curious about how this plotting 
algorithm works, choose your own values for xO and 
yO (21 and 55, for example). Calculate xl and yl 
from the formula above (170,136). Finally, calculate 
all of the points that will be plotted (don't add in the 
64; it makes things easier to see). Our example 
would yield coordinates of (21,55), (21,136), 
(55,21), (55,170), (170,55), (170,136), (136,21) 
and (136,170). If you plot these on a piece of graph 
paper with 0,0 in the upper left corner and 191,191 in 
the lower right, you'll see that they are symmetric 
about the center. 

The only part of Gen() not explained yet is: 



r.cnt == 
IF r.cnt 



FI 



e THEN 



The first statement decrements the cnt field of r, and 
the IF statement body is executed when cnt reaches 
zero. 

The statements: 

r.fax - Cr.bx + r.cx) ! r.cx 
r.by = (r.by + r.cy) >. r.cy 

calculate new values for bx and by, which cause the 
ax and ay calculations to change in the future as well. 
The line: 

r.cnt = period 

resets cnt so that it can count down to zero again. 
Finally, 

ftTRflCT = 8 

keeps the screen from going into attract mode. Note 
that ATRACT was declared to be at location 77. 
This is the memory location used by the OS to 
determine if attract mode is on or off. 

A look at Kal(). 

Now you understand (I hope) how the Gen() 
procedure works. So let's look at Kal() and see how 
it uses Gen(). 



GraphiC5C24J 
SetColorCl,8,l4) 



5etColorC2,e,eJ 



set up graphics mode 24, with white dots on a black 
background. The next group: 

persistence = 2588 

period = 18888 p. cnt = period 

p. ax = 5221 p.bx = 64449 p.CX - 3 

p. ay = 57669 p.bx = 64489 P.cy - 3 

sets the initial values that control the pattern 
generation of Gen(). You can change these to 
generate your own patterns. As stated above, ax, ay, 
bx, by, ex and cy are used to calculate the points to 
be plotted. The value for period determines how 
frequently the pattern will change. The value for 
persistence determines how much of the pattern will 
be on the screen at once. 

You may be saying at this point, "Hold on there! If 
you don't erase any points, the screen will just turn 
white," and you would be right. That's the reason 
for: 

MoveBlockte, p, REC) 

and why Gen() is passed a record argument. It turns 
out that, depending on the value of color, Gen() will 
either plot or erase points on the screen. The p 
record will be used for plotting, and the e record will 
be used for erasing. MoveBlock makes a copy of p 
(all the fields) in e, because when a record variable is 
referenced without a field, the address of the record 
is used. When a type name is referenced, the size in 
bytes of the type is used. Thus, MoveBlock is being 
called with the address of records e and p, and the 
size of the record. Initially both p and e will have the 
same values. Here is how p and e are used: 



WHILE CH = 255 DO 
color = 1 GenCp) 
color = 8 Gen(e) 

OD 



First, color is set to one (plot points) and Gen() is 
called with p as an argument (remember, this passes 
the address of p, a POINTER, to the Gen() 
procedure). Next, color is set to zero (erase points) 
and Gen() is called with e as an argument. Since 
both p and e start out the same, what happens is that 
Gen(p) draws some points on the screen and 
Gen(e) erases them. That keeps the screen from 
turning white. 

The sequence will keep repeating as long as CH 
equals 255. CH was declared to be at address 764, 
the location that the OS stores the internal value for 
the last key pressed. It is set to 255 by the keyboard 
handler after a key is processed. Thus, as long as no 
key is depressed, CH will equal 255. As soon as a 
key is depressed, it will contain the code for the last 
key (will no longer equal 255) and the loop will 
terminate, causing: 



New 
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BOOKS for ATARI 400/600XL/B00XL 

1200XL 

ATARI BASIC - Learning by Using 

An excellent book for the beginner. 
Many short programs and learning exer- 
cises. All important features of tiie 
ATARI computers are described (screen 
drawings, special sounds, keys, paddles, 
joysticks, specialized screen routines, 
graphics, sound applications, peeks, pokes, 
and special stuff). 

Order-No. 164 S7.95 

Games for the ATARI Computer 
This book describes advanced program- 
ming techniques like player-missile- 
graphics and use of the hardware-registers. 
Contains many ready to run programs in 
BASIC and one called GUNFIGHT in 
machine language. 
Order-No. 162 S7.95 

How to program your ATARI in 6502 
Machine Language 

Introduction to machine language for the 

BASIC programmer. 

Order-No. 169 89.95 

FORTH on the ATARI - Learning by 
Using 

Introduction, programs, applications, 

learning exercises. 

Order-No. 170 S7.95 

All programs from book No. 170 on disk. 
Order-No. 7319 S22.00 onlyl 

A Look into the Future-ASTROLOGY 

on your ATARI 800. How to calculate 
your own horoscope. Including listing of 
the program. 
Order-No. 171 S9.95 

HACKERBOOK for yolir Atari computer 

Tips+tricks— Very impoVtant subroutines 
in 6502 machine language. How to make 
bootable cassettes, disks, and EPROMs. 
Complete construction article and soft- 
ware on how to build an EPROIVl burner. 
Order-No. 172 S9.95 

SMALL BUSINESS SOFTWARE FOR 
ALL ATARI COMPUTERS 

SUPERMAIL (500 addresses on 1 disk] 
Completely written in FORTH. Comes on 
autoboot disk. No cartridge, no DOS, no 
FORTH language required. 
Order-No. 7312 S49.00 

SUPERINVENTORY (1000 items p.disk) 
Completely written in FORTH. Same as 
above. (Disk only) 
Order-No. 7320 S49.00 

BUSIPACK-1 (written in FORTH). Com- 
plete order entry, inventory, mailing and 
invoicing. (Disk only). 
Order No. 7313 S98.00 

Microcomputer Hardware Handbook 
Order-No. 29 S 14.95 



ATCASH 

Convert your ATARI 800 into a powerful 

cash register. (Disk only). 

Order-No. 7303 S49.95 

Invoicing program in BASIC 

Order-No. 7201 (C) S29.95 

Order-No. 7200 (D) S39.95 

Mailing List in BASIC 

Order-No. 7212 (C) S19.95 

Order-No. 7213 (D) S24.95 

Inventory control in BASIC 

Order-No. 7214 (C) S19.95 

Order-No. 7215 (D) S24.95 

SOFTWARE IN MACHINE LANGUAGE 

FOR ATARI 

ATMONA-1 

Machine language monitor. 

Order-No. 7022 (C) S19.95 

ATMONA-2 

This is a tracer (debugger) that lets you 
explore the ATARI RAM/ROM area. 
You can stop at previously selected 
address, opcode, or operand. Also very 
valuable in understanding the micropro- 
cessor. At each stop, all registers of the 
CPU may be changed. Includes Atmona-1. 
Order-No. 7049 cassette S49.95 
Order-No. 7050 disk 854.00 

ATMAS 

Macro-Assembler for ATARI-800/48K. 
One of the most powerful editor 
assemblers on the market. Versatile editor 
with scrolling. Up to 17k of source-code. 
Very fast, translates 5k source-code in 
about 5 seconds. Source code can be 
saved on disk or cassette ( I ncl. Atmona-1). 
Order-No. 7099 disk S89.00 

Order-No. 7999 cartridge SI 29.00 
ATMS APPLICATION DISK 
All programs and machine language sub- 
routines from Book No. 169 on disk. 
Order-No. 7311 S20.00 

ATAS 

Same as ATMAS but without macro- 
capability. (32K and 48K RAM) 
Order-No. 7098 S49.95 

ATEXT-1 

This wordprocBssor is an excellent buy 
for your money. It features screen oriented 
editing, scrolling, string search (even 
nested), left and right margin justification. 
Over 30 commands. Text can be saved on 
disk or cassette. 

Order-No. 7210 cassette S29.95 
Order-No. 7216 disk S34.95 

Order-No. 7217 cartridge S69.00 



FORTH for the ATARI 

FORTH from ELCOMP PUBLISHING, Inc. 
is an extended Fig-Forth-version, Editor 
and I/O package included. Utility package 
includes decompiler, sector copy. Hex- 
dump (ASCII), ATARI filehandling, total 
graphic and sound, joystick program and 
player missile. Extremely powerful! 
Order-No.7055(D) reg.S99.00sale $39.95 
Floating point package with trigonometric 
functions (0-90»). 
Order-No. 7230 disk S29.95 

Learn FORTH 

A subset of Fig-Forth for the beginner. 
On disk (32k RAM) or cass. (16k RAM). 
Order-No.7053 reg. 79.00 sale S19.95 

HARDWARE-ADD-ONs for ATARI 

PRINTER INTERFACE 

This construction article comes with 
printed circuit board and software. You 
can use the EPSON printer without the 
ATARI printer interface. (Works with 
gameport 3 and 4). 

Order-No. 7211 S19.95 

300 Baud serial interface (RS232+5V) 
Software with connector and construc- 
tion article. 
Order-No. 7291 S19.95 

EPROM BURNER for ATARI 400/800 
KIT. Printed circuit board incl. software 
and extensive construction article. 
Order-No. 7292 S49.00 

EPROM BOARD (CARTRIDGE) 
Holds two 4k EPROMs (2532). EPROMs 
not included. 

Order-No. 7043 S29.95 

EPROM BOARD KIT 
Same as above but bare board only with 
description. 

Order-No. 7224 S14.95 

Astrology and Biorhythm for ATAR I 
Order-Nol 7223 D/c S 29.95 

Birth control with the AtarKKnaus Ogino) 
Order-No. 7222 disk only! S29.95 
The APPLE in your Hand, BRAND NEW! 
Book includes introduction to 6502 
Machine Language and FORTH. BASIC 
programs never published before! 
Order-No. 178 (200 pages) S12.95 
CP/M -MBASIC and the OSBORNE 
computer 

Business Applications, compl. listings of 
mailing list, datablock, inventory, in- 
voicing and more. 
Order-No. 177 S9.95 



SUPERSOFTWARE f .the Coniimodore-64 
BLIZTEXTI - The best wordprocessor 
for the C-64 in the whole universe. In- 
cludes terminal software for electronic 
mail. 

Order-No. 4965(62 pages manual)£89.00 
MACROFIRE - Editor/Asser'^' " ' 
the C-64 

The best macroassembler you can buvU 
Order-No. 4963 S89.00 

SUPERBOOKS for your C-64 
The Great Book of Games, Vol. I 
64 programs for the Commodore-64. 
Order-No. 182 £9.95 

Programs from this book on disk S 19.95 
MORE ON THE SIXTYFOUR 
Tips, tricks, hints, very important sub- 
routines. 

Order-No. 182 S9.95 

Programs from this book on disk S19.95 
How to program in 6502 Machine 
Language on your C-64 
Order-No. 184 S12.95 

Commodore-64 Tune-up, Vol. I 
How to expand your C-64. 
Order-No. 185 S12.95 

Small Business Programs for the C-64 
Order-No. 186 SI 2.95 

HARDWARE ADD-ONs for your C-64 
Parallel printer interface, KIT 
Order-No. 4990 S19.95 

Universal Experimenter Board 
Order-No. 4970 £9.95 

Expansion Board (holds 4 exp. boards) 
Order-No. 4992 £29.95 

BOOKS, SOFTWARE, ADD-ONs for 
VIC-20, APPLE M, OSBORNE, TIMEX 
+ OSI computers 
Tricks for VICs (Book) 
Order-No. 176 £9.95 

Universal Experim.board for the VIC-20 
(Save money with this great board). This 
board plugs right into the expansion slot 
of the VIC-20. 

Order-No. 4844 reg. £ 1 9.95 sale £9.95 
Programming in BASIC and machine 
language on the ZX-81 (82) TIMEX1000 
Order-No. 174 (book) £9.95 

The Custom APPLE ■^ Other Mysteries 

A complete guide to customizing the 
APPLE software and hardware. 
Order-No. 680 £24.95 

We also stock the boards which are used 
in the book IMo. 680 (bareboards). 



Hon 



i^: 



PAYMENT: Check, money order, VISA, MASTER 

CARD, Eurocheck, ACCESS, Interbank 

Prepaid orders add S3.50 for shipping (USA) 

S5.00 handling for C.O.D. 

All orders outside USA: add 15% shipping, California 

residents add 6.5 % sales tax. 



Elcomp Publishing, Inc, 53 Redrocl< Lane, Pomona CA 91766, Plione: (714) 623-8314, Telex: 29 81 91 
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JOUST 
ATARI, Inc. 
P.O. Box 61657 
Sunnyvale, California 94086 
16K Cartridge $39.95 



by Joel Gluck 



I'll admit it. Joust, by Williams, is probably my 
favorite arcade game. No other video game provides 
such playful freedom, marvelous two-player inter- 
action, and hilarious physical antics as Joust. 

A description of Joust can be deceptively simple. 
Briefly put, you control a bird upon which your 
knight rides, flying about by means of flapping with 
the control button and moving the control stick right 
and left. "Jousting" with one of the many opponent 
flying knights on the screen entails colliding with 
them; whoever's mount is highest at the moment of 
collision is the victor. If you succeed, the enemy bird 
flys off riderless, leaving an egg behind, which you 
must retrieve before it hatches into a new opponent. 
If the enemy knight wins, you lose your life (but do 
not despair; you have several lives). 

Of course, there are complexities in the game. For 
one, there are three kinds of enemy knights — and, if 
an egg hatches, it hatches into a knight of a more 
dangerous kind. There are other hazards: the Lava 
Troll awaits in the pool of fire at the bottom on the 
screen, ready to pull you in if you fly too close; and 
deadly Pterodactyls frequently prowl the screen, 
usually appearing at the end of a round. 

I love the arcade version of Joust, and worried 
that the new Joust cartridge for the Atari Home 
Computer would be inferior. My opinion, now that 
I've played the game, is that the programmers of 
Atari Joust did an admirable job, considering the 
memory limitations of a home computer. 

For starters, the screen is beautiful. I was shocked 
to see that the original Joust playfield had been 
almost exactly duplicated, in every color and detail. 
The game is also faithful to the arcade version in 
most other details of play, with a few minor excep- 
tions. For example, when an egg hatches, in the 
arcade version a knight appears and waits for its 
mount to fly onto the screen and pick it up. In the 
Atari version, both knight and mount hatch as one. 
The best reason for me to recommend Atari Joust 
is that it is fun to play, especially as a two-player 
game. However, for the record, I do have a few com- 
plaints: 

1. Control over your knight (with the joy- 
stick) is not as precise as in the arcade version. 
The probable reason for this is that the game 
had to be designed so that one would not have 
to push the trigger as often as one has to hit the 
flap button in the arcade version. Also, I find it 



difficult to stop or change directions quickly, 
something I find easy in arcade Joust. 

2. Atari Joust proceeds from one round to 
the next too quickly. There should be time to 
position your knight properly, as in the arcade 
version. 

3. At the end of the game, at the exact 
moment when you ordinarily glance down to 
see your final score. Atari Joust immediately 
switches to the title screen. This is very 
annoying. 




Joust. 

These complaints are relatively minor, however. 
The game is fun, and that's what counts. I've seen 
some bad arcade adaptations in my time, and Atari's 
new Joust isn't one of them. D 



A LIMITED NUMBER 

OF BACK ISSUES 

IS AVAILABLE. 

ISSUES 

2, 8, 11,12, 13, 14 & 15 
$4.00 EACH 



ANALOG BACK ISSUES 

P. O. BOX 23 
WORCESTER, MA 01603 
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CH = 255 : Graphics C8> 
RETURN 

to be executed. This sets CH back to 255 so that the 
keyboard handler won't think a key has been 
depressed, and restores graphics nnode before 
returning to the Action! monitor. 

I'll bet you're wondering why I didn't mention: 

color = 1 

FOR npnts = 1 TO persistence DO 

GenCp} 

UNTIL CHtt255 
OD 

yet. It's there for a reason. If you execute the loop 
below it, only one set of points will be displayed at a 
time. Although this is somewhat interesting, it isn't 
what I intended. The FOR loop causes 
"persistence" sets of points to be generated without 
any being erased (note that only Gen(p) is called, 
with color equal to one). So when the WHILE loop 
below this is reached, the call to Gen(e) will erase 
points that were plotted "persistence" interactions 
earlier. The values of p will always be "persistence" 
interactions ahead of e. Thus, you'll always have at 
most "persistence" sets of points on the screen at 
any given time. 



The UNTIL at the end of the loop serves the same 
purpose as the WHILE described earlier. The only 
difference is that an UNTIL loop repeats as long as 
the condition is false (the inverse of WHILE). That's 
why CH is tested to not equal 255 (inverse of equal 
in WHILE). 

Those of you who have an Action! cartridge 
should try this program. It's very small and easy to 
enter. The first thing you'll notice is that it doesn't 
run especially fast. This is mainly due to the fact that 
it is using the Atari operating system's PLOT 
subroutine. In Part II of this series, I'll discuss some 
things you can do to speed it up. You may also wish 
to adjust the colors on your TV set or monitor to get 
the best-looking patterns. D 



Action! listing. 

KAL.OCT 

ANALOG Conputing ttl7 

Copyright 1984 BY Clinton Parker 

All Rights Reserved 

last widified January 11, 1984 

Global variables 




Meet 

the 

Family 

A NEW DATA STORAGE SYSTEM 
FOR THE 48K 800 



APROM 

A GENERAL PURPOSE 
EPROM PROGRAMMER 

Stored programs run at ROM 

speed. 1 6K bytes in two 8K 

blocks. Programs 2764 or 

27128 at BK bytes/minute. 

Either can be transparent or 

active under program control 



SIX PACK 

Six 8K blocks 

software 
switched for 

2764 or 
271 28 EPROM 



DATABASE 

Erases two EPROMS 

Send money order or check to: 




Aprom with disk software, 
instruction book and 

Textool ZIP socket 99.50 

SIX PACK 44.95 

DATARASE 34.95 

Eproms not included 2764 10.00 

Pius $2.00 shipping & handling 
Arizona residents add 6% tax 



Makers of AprOITIo 



7755 E Evans • Suite 400 • Scottsdale, AZ 85260 • (602) 998-7550 



A New Data Storage System 




A subscription to Games Datamag gives you 
more games, news & reviews for your money! 

Games Datamag gives 
you more software value 

Discover new ways to use your ATARI 
computer and get more for your money. 

Games Datamag is a new subscription 
on cassette featuring in each issue: 

1. 16K GAME that's ready to run 

2. DISKETTE version at no extra cost 

3. NEWS on the latest games & techniques 

4. Game reviews and contests 

The Fall issue game is a treasure hunt 
called Treasure Palace. This winter we 
feature Battle CruiserNebula. Don't 
miss a single issue! 

$24 a year, quarterly; or sample issue 
for $8 (overseas orders add $8) from 
USCSDept. 81, 1737 Walnut Grove, 
Decatur IL 62526 
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TYPE REC=ICARD cnt, aXj bx, cx, ay , fay, cyl 

REC p, e 

CftRD period, npts, persistence 



PROC GenCREC POINTER D 



BYTE X0, yfl, xl, yl. 


ftTRftCT 


get new a 




r.ax = (r.ax + r.bxl 
r.ay = (r.ay + r.byJ 


! r.bx 
• r.by 



r.cnt -- -1 

IF r.cnt - THEN ; get new b 

r.bx = Cr.bx + r.cxJ ! r.cx 

r.by = Cr.by + r.cyJ ! r.cy 

r.cnt = period 

flTRftCT - j turn off attact mode 
FI 



x0 - r.BX R5H 9 

y0 = r.ay RSH 9 

IF xO <= y0 AND yO 

xl - 191 - X0 

yl = 191 - y0 

Plot(x8+64, y0) 

PlotCy0+64, 

PlotCxl+64, 

Plotfyl+64, 

FI 

RETURN 



PROC Kal C) 



xe} 

yO) 
xS) 



< 96 THEN 



PlotfxO+64, ylJ 
PlOtfyO+64, Xl) 
PlotCxl+64, ylJ 
Plottyl+64, xl) 



CHAR CH=764 

Graphics(24) 

SetColorCl,0,14) : SetColor C2,e,0) 

change for different patterns: 

persistence = 2500 
period = 10000 p.cnt r period 
p.ax= 5221 p.bx=e4449 p.CX=3 
p.ay=57669 p.by=64489 p.cy=3 

copy plot record to erase record 

HoveBlOCkCe, p, REC3 

handle persistence 



color = 1 
FOR npts 

GenCp) 

UNTIL CHtt255 
OD 



1 TO persistence DO 



; draw patterns until key drepressed 

WHILE CH = 255 DO 

color r 1 Gen(p) 

color = GenCe) 
OD 

; ignore key and restore screen 

CH = 255 : Graphics (0) 

RETURN 



CASADAPTER 

"IT REALLY WORKS!" 



CASADAPTER is a cassette interface tliat al- 
lows you use your own cassette recorder or 
stereo with the Atari 400/800/1200®. 
CASADAPTERwill handle motor control, audio 
and data channels. 

»34.95 



48K 



RAM BOARD FOR: 

THE ATARI 400® 
*1 15.00 




COMPUTER PRODUCTS 



12 Scamridge Curve 
Buffalo, New York 14221 
(716) 632-3441 

Dealer Inquiries Invited 
'Product of Gemini Software 



Add '2.50 shipping. 

Send check or money order 

C.O.D. accepted 

New York State Residents 

add 7% tax 

®Atari is a trademark of 

Atari, Inc. 



*MAGIC DUMP is a screen dump utility that allows 
you to dump a Hl-Resolution graphics picture to a 
printer in a variety of different sizes. MAGIC DUMP 
is used In the RIGHT hand cartridge slot, so it is 
always ready to use. 

MAGIC DUMP will work with all Epson printers and 
Gemini printers, the Centronics 739 printer, and the 
Prowrlter or N.E.C. printers. igg gc 



*GTIA DRAW is a drawing program that uses all the 
features of Atari's® new GTI A chip. GTIA DRAW will 
give you three extra graphics modes, Mode 9 (16 
luminances and one color), Mode 10 (8 luminances 
and color), or Mode 11 (16 colors and one lumi- 
nance). 

GTIA DRAW will allow you to: 
• Add text to pictures 

Blank horizontal or vertical lines 

Shift the screen in any direction 

'ZOOM' in on certain areas of a picture 

Fill portions of a screen 

Work on two different screens simultaneously 
»49.95 



*THE DRUMESISER is a unique sound synthesizing 
tool that allows the creation of sounds such as a 
drum, piano, organ, harpsichord, or electronic syn- 
thesizers. The different types of sounds created are 
limited by the user's imagination and ambition. 
THE DRUMESISER comes with an Editor, which 
allows you to create your own sounds, a Player, 
which will allow you to play the different instru- 
ments, and the Memory Options, which make it pos- 
sible for you to playback any sounds that you have 
recorded. 

*49.95 
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SILICON WARRIOR 
EPYX, Inc. 
1043 Kiel Court 
Sunnyvale, California 94089 
16K Cartridge $39.95 



by James Trunzo 



Silicon Warrior, the newest cartridge release by 
Epyx for Atari computer systems, takes a simple tic- 
tac-toe playing scenario and turns it into a challeng- 
ing strategy /action game that will please both the 
intellect and the arcader alike. Set in the Silicon 
Valley in the year 2084, Warrior depicts the 
conflict between (now get this!) the House of Peanut, 
the House of Apple, the House of Adam and the 
House of Pong! Subtle, huh? Each house is represent- 
ed by a warrior whose job it is to "program" five 
chips in a row (horizontally, vertically or diagonal- 
ly), and defend them for a short time period to 
achieve a victory. Now while this may sound like a 
simple task, it is in concept only. 

Play begins with the selection of the game's para- 
meters. Warrior allows up to four combatants per 
contest in any combination of human and/or com- 
puter players (the Atari 400 and 800, with their four 
joystick ports, will allow four human players while 
the new XL systems would be limited to two). 
Players may select from seven levels of difficulty. 
Furthermore, each level may be played at one of 
three speeds — slow, medium or fast. Obviously, 
there are a tremendous number of playing combina- 
tions that may be designed which gives Silicon 
Warrior almost unlimited flexibility and variation, 
insuring that the game will not become stale after 
repeated plays. 

Once parameters are selected, the game begins. 
The playfield is simple in the extreme. It's made up 
of twenty-five rectangular "chips" and four power 
pyramids. The chips are all "unprogrammed" 
(blank) at the beginning and, as mentioned, the 
player's task is to program five chips in a row. To do 
this, you must land on a chip, which will 
immediately change to the player's color. What 
makes this difficult to accomplish, however, are any 
or all (depending on the difficulty level selected) of 
the following obstacles: 

Enemy warriors: Warriors from opposing houses 
are competing for chips and moving at the same time 
you are. The computer plays a strong game on all 
levels, and will block you whenever it can. The 
enemy can also land on a chip which you have pro- 
grammed and change it back into a blank chip, 
thwarting your carefully planned strategy. In 
addition, warriors can fire lasers (so can you) which 
drain your power and eventually force you back to 



your power pyramid for a recharge. Of course, all the 
while that you're inside your pyramid, the other war- 
riors are programming new chips and de- 
programming yours. 

Shields: On higher levels of play, all warriors 
become armed with shields that protect them from 
enemy laser blasts. This option adds another layer of 
strategy to play by introducing the element of de- 
fense to the game. 

Black Hole Glitches: Occasionally, a glitch wiU 
occur, turning one of the chips back. Any warrior 
occupying the chip or teleporting to it when it turns 
black is instantly returned to his power pyramid. 

You can easily see that, with all of the factors men- 
tioned above coming into play along with the speed 
variations and multiple opponents, Silicon Warrior 
can certainly represent a significant challenge to both 
mind and hand. 




Although Silicon Warrior consists of only one 
screen, don't assume that the game lacks in the area 
of graphics, sounds or special effects. Consider that 
each warrior is a specific color and that each chip he 
programs adopts that color; consider also that a 
distinct tone emanates from a chip as it is program- 
med. When you blend these two elements together, 
along with the fact that the actions of the four war- 
riors take place simultaneously and continuously, 
you have a true cacaphony of color and sound taking 
place. 

Further, the warriors themselves are well-defined, 
and the animation that occurs when they are in 
combat, teleporting and re-materializing is excellent. 
Finally, the chips are laid out in such a way that the 
overall effect, when surrounded by the hundreds of 
minute, twinkling stars and the four power 
pyramids, creates a three-dimensional illusion that 
works for the viewer. The variety of strategies and 
hand-eye coordination required to be victorious in 
combat make Epyx's Silicon Warrior well worth the 
price. n 
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Some program listings 


reproduced in A.N. A.L.O.G. may contain "strange" characters not shown on | 


the ATARI keyboard. 


These are special characters 


which use 


the CTRL, 


ESC and "ATARI LOGO" 1 


(INVERSE) keys. 


She 


wn below is a list of these characters 


and the keystrokes used to 


get them. D 1 


• 


CTRL 


p 








■ 





INVERSE 


CTRL 


M 


h 


CTBl 







t CTRL Z 




■ 





INVERSE 


CTRL 


N 


1 


CTRL 


B 




t ESC ESC 




n 





INVERSE 


CTRL 





J 


CTRL 


C 




♦ ESC CTRL UP-ARROH 


B 





INVERSE 


CTRL 


P 


4 


CTRL 


D 




♦ ESC CTRL DOWN 


-ARROH 


r 





INVERSE 


CTRL 





1 


CTRL 


E 




♦ ESC CTRL LEFT 


-ARROM 


w 





INVERSE 


CTRL 


R 


/ 


CTRL 


F 




•» ESC CTRL RIGHT-ARROW 


■ ■ 

■ I 





INVERSE 


CTRL 


5 


\ 


CTRL 


G 




• CTRL . 




□ 





INVERSE 


CTRL 


T 


d 


CTRL 


H 




♦ CTRL ; 




■i 





INVERSE 


CTRL 


U 


■ 


CTRL 


T 




H ESC SHIFT CLEAR 


I 





INVERSE 


CTRL 


V 


k 


CTRL 


J 




i ESC BACK 5 




■ I 





INVERSE 


CTRL 


H 


■ 


CTRL 


K 




> ESC TAB 




■■ 





INVERSE 


CTRL 


K 


■ 


CTRL 


L 




C IHWERSE CTRL 


f 


1 





INVERSE 


CTRL 


Y 


— 


CTRL 


HI 




i; INVERSE CTRL 


A 


L' 





INVERSE 


CTRL 


Z 


^ ""**" 


CTRL 


N 




1 INVERSE CTRL 


B 


a 





ESC DELETE 




■ 


CTRL 







a INVERSE CTRL 


C 


E3 





ESC INSERT 




♦ 


CTRL 


P 




a INVERSE CTRL 


D 


□ 





ESC CTRL TAB 


CCLR) 


r 


CTRL 







a INVERSE CTRL 


E 


B 





ESC SHIFT TAB ISETJ | 


• 


CTRL 


R 




fj INVERSE CTRL 


F 


■ 





INVERSE 


SPACE 1 


+ 


CTRL 


5 




^ INVERSE CTRL 


G 


■ 





INVERSE 




1 


• 


CTRL 


T 




r INVERSE CTRL 


H 


Q 





INVERSE 


CTRL 


1 


■ 


CTRL 


U 




r INVERSE CTRL 


I 


□ 





INVERSE 


CTRL 


1 


1 


CTRL 


V 




1 INVERSE CTRL 


J 


II 





INVERSE 


1 


1 


T 


CTRL 


H 




U INVERSE CTRL 


K 


□ 





ESC CTRL 2 


1 


JL 


CTRL 


X 




J INVERSE CTRL 


L 


U 





ESC CTRL BACK S 1 




CTRL 


V 








u 




ESC CTRL INSERT 1 



PERSONAL 



• IMPROVEMENT 

• CONFIDENCE 

• KNOWLEDGE 

• ADVANCEMENT 



LEARNIT 



THE 
C-O-M-P-U-T-E-R-I-Z-E-D 
^^K flashcard method of learning ^H^ 



•FACTS •KNOWLEDGE •ANSWERS 
I that you want to learni 

^ can be entered then brought back to help 
you learn , remember & associate 

^an ingenious HINJ feature helps you recall & 
associate by giving only selected parts of a 
fact or answer whenever you ask for It 

^ cards can be used In reverse order, back side 
shown first , (excellant for english«» foreign 
language learning ) 

^ cards can be sorted, changed, erased, added, 
stored & more 

^ vou select either self or computer scoring 

^missed cards can be selected out for rerun 
as often as you decide 



will run on ATARI 400/800 with 48K 



send $26.95 (postage included) for disc & 
manual to TELEMETRICS p.o. box 606 
Arab, Al. 35016 

^Alabama residents add$1.75 sales tax.^ 



WANT 
TO SUBSCRIBE? 



D 1 year (12 issues) $28 

D 2 years (24 issues) $52 

D 3 years (36 issues) $79 

Canada & IVlexico $8 Surface, $12 Air 
Other Foreign $12 Surface, $48 Air 
Piease, remit US funds. Thanl< you. 



For Fastest Service, Call Our 

Toll -Free US Order Line 

800-345-8112 

in Pennsylvania call 800-662-2444 
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MS. PACMAN 
ATARI, Inc. 
P.O. Box 61657 
Sunnyvale, California 94086 
16K Cartridge $39.95 



by Kyle Peacock 



She's here'. Ms. PacMan at last makes her debut in 
the home computer market. Naturally, she wants to 
leave a good impression, so she's lengthened her 
eyelashes, glopped on some lip gloss and gone to the 
hairdresser. 

Like her legendary predecessor, the object of Ms. 
PacMan is to win points by gobbling up dots in a 
maze of corridors. Finish all the dots and the maze is 
refilled for another round. Sound too easy? It would 
be, if the game didn't include a certain infamous 
foursome of rag-tag ghosts. Inky, Blinky, Pinky and 
Sue (Clyde's sister, perhaps?) are back, and they're 
out to settle the score with PacMan's lady friend. 

Should Ms. PacMan come in contact with any 
member of this fearless quartet, she's off to the hurt 
locker. Fortunately, the lady Pac has a way to turn the 
tables on the unfriendly ghouls. Digesting one of the 
four glittering "power pellets" in the maze turns the 
ghosts into bashful wimps and our heroine into 
Supergirl, tallying up extra calories and bonus points 
by devouring her enemies. 

Floating fruit. 

Pieces of fruit occasionally wander into the maze 
through a side door. These valuable prizes randomly 
prance around, waiting to be gobbled up. The fruit is 
a diabolical twist on the original PacMan concept; 
often the tempting prizes are just enough of a distrac- 
tion for the ghosts to get the jump on you. A strategy 
hint: Fruit always enters or exits the maze through a 
side door. Hanging around these areas is a fast way to 
rack up bonus points. 




Another unique feature of Ms. PacMan is the 

changing mazes. After two levels of a simple pink 
maze, the game switches to a more complicated 
blue maze, and so on. High-level mazes require 
new strategies, as there are more traps and dead-ends 
to get caught in. Unlike many games, which simply 
move faster as play progresses, Ms. PacMan offers 
both quick-paced action and changing scenery. 




Ms. Pac Man. 



I'm happy to report that Atari has included all of 
the amusing "intermission" scenes of the arcade 
classic in this home computer version. They've even 
gone two steps further by giving you five lives instead 
of the usual three, and by letting you skip the begin- 
ning levels and start at the maze that best suits your 
capabilities. 

Our friend flicker. 

Overall, I enjoy Ms. PacMan. Both the arcade and 
home editions offer more challenge and variety than 
her boring boyfriend. That doesn't mean I'd nomi- 
nate Ms. PacMan for Atari Computer Game of the 
Year, though. Why not? Well, I have this habit of 
looking at video games from a programmer's point 
of view. Does Atari think we haven't seen their Pac- 
Man for the 2600? Wrong! I've seen it, and made the 
same comment as everybody else: "Why do the 
ghosts flicker so badly?" You'll find yourself asking 
the same question of this computer version of Ms. 
PacMan. Believe it or not, Atari has once again 
taken the easy way out by multi-tasking the player/ 
missile graphics. 

Let's be realistic, guys! Apple and Commodore 
owners are playing games a lot more complicated 
than Ms. PacMan without any flicker at all. The 
Atari computer version of regular old PacMan 
doesn't glitch, and neither should its descendants. 
Too bad an otherwise nice piece of software has to 
fall prey to lazy programming. If you can ignore the 
mediocre graphics, Ms. PacMan still makes for an 
enjoyable date, whatever your gender. D 
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BASIC 

TRAINING 



by Tom Hudson 



Since the last two installments of BASIC Training 
have been devoted to the IF/THEN structure, I 
thought it would be good to continue our discussion 
of control structures. This issue, we'll take a look at 
one of Atari BASIC'S loop control structures, FOR/- 
NEXT. 

What will they think of NEXT? 

The FOR/NEXT structure is incredibly versatile. 
Its primary use is for controlling the number of times 
a loop is executed. A loop is simply a set of instruc- 
tions executed over and over again. Generally, a loop 
is executed until some condition is met which allows 
the program to continue. 

FOR/NEXT loops are also used for timing var- 
ious functions in BASIC. If your program operates 
too fast, a simple time-delay loop can slow it down to 
the speed you like. This is often the case with sound 
generation. 

Let's look at the syntax of the FOR/NEXT 
structure: 

FOR avar = aexpl TO aexp2 (STEP aexp3) 
NEXT avar 

As you can see, a FOR/NEXT has two parts: The 
FOR-TO initialization statement with an optional 
STEP parameter, and the NEXT statement, which 
ends the loop. 

In the above example, "avar" means that any vari- 
able name can be used in the indicated position, 
"aexp" indicates that any valid expression can be 
used where indicated. 

FOR/NEXT actually performs a rather simple 
job. Look at the program in Figure 1. 




18 FOR COUIiT=l TO 18 5TEP 1 
28 PRINT COUNT 
38 NEXT COUNT 

Figure 1. 
Figure 1 shows a simple, three-line program 
which will PRINT the numbers from 1 to 10. 

Line 10 tells the computer to use the variable 
COUNT in the FOR/NEXT loop. It will initial- 
ize COUNT to 1 and stop when COUNT equals 
10. Each time the computer reaches the "NEXT 
COUNT" statement, it will increment COUNT 
by 1, indicated by the optional "STEP" value. If 
the STEP value is not given, the computer will 
assume a STEP of I. 

Line 20 prints the value of COUNT on 
the screen. 

Line 30 uses the NEXT statement to incre- 
ment the COUNT variable by the number indi- 
cated in STEP, and automatically loops back to 
the next statement after line 10. In this program, 
the computer will perform the loop ten times, 
printing COUNT each time. The result will 
look like Figure 2. 

1 
2 
3 

4 
5 
6 
7 
8 
9 
18 

READY 
Figure 2. 
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You can simulate a FOR/NEXT loop very easily. 
The program in Figure 3 does the same thing as 
Figure 1, without using the FOR/NEXT structure. 

la COUNTrl 

29 PRINT COUNT 

39 C0UNT=C0UNT+1 

49 IF C0UNT<=19 THEN 29 

Figure 3. 

You can see that the function performed by the 
FOR/NEXT loop is very simple, and easily dupli- 
cated by only one extra BASIC statement. Why is it 
better to use FOR/NEXT? 

First, the FOR/NEXT version of the program 
uses less memory. The code in Figure 3 requires 25 
more bytes than Figure 1. This may seem insignifi- 
cant, but these few wasted bytes can add up to a 
staggering number in a large program. 

Second, the FOR/NEXT version is noticably 
faster than the equivalent BASIC code. Remember, 
BASIC interprets each line of code each time it is 
executed. The extra lines require more time to pro- 
cess than a simple NEXT statement. 

Finally, the FOR/NEXT code is much easier to 
type and easier for other programmers to understand 
than the equivalent BASIC code. Remember, you 
may not be the only person who ever looks at your 
programs, and making the program as readable as 
possible is very important. 

Leaving the loop. 

There are two ways to leave a FOR/NEXT loop. 
The first requires no programmer action, since it is 
handled by the computer. This occurs when the 
value of the FOR/NEXT variable exceeds the high 
value specified by the "TO" parameter. The pro- 
gram in Figure 4 shows the normal termination of a 
FOR/NEXT loop. 



"TO" value. 

The second way to leave a FOR/NEXT loop is 
with a GOTO statement, as shown in Figure 5. 



19 


FOR 


NUH=11 


TO 5 


STEP 


-1 


29 


PRINT NUM^NUH/2 






39 


IF NUM/2<5 


THEN 


GOTO 


59 


49 


NEKT 


NUM 








59 


END 










RUN 










11 




5.5 








18 




5 








3 




4.5 









READY 

Figure 5. 

No special programming is needed to terminate 
FOR/NEXT loops when the GOTO exit is used, but 
you should be very sure of your program's flow to 
avoid any problems. One potential problem is run- 
ning into the NEXT statement after your loop is 
supposed to be ended. If this happens, the loop may 
be re-entered, with nasty (and aggravating) results. 

Note that in Figure 5, the FOR/NEXT loop goes 
from a high value (11) to a lower value (5). When 
this structure is needed, a negative STEP value is 
needed for proper execution of the loop. 

There is a third possibility for the exiting of a 
FOR/NEXT loop: no exit. How is this possible? 
Figures 6 and 7 show two possibilities. 



10 FOR EgER=l 
29 NEKT EUER 



TO 2 5TEP 



Figure 6. 

Figure 6 won't terminate because it has a zero 
STEP value. It will keep adding to the variable 
EVER, and will obviously never reach the TO value 
of 2. 



18 FOR H=l TO 20 STEP 3 

20 PRINT "INSIDE LOOP:";K 

30 NEXT K 

49 PRINT "UftLUE AFTER LOOP;";X 

RUN 

INSIDE LOOPJl 
INSIDE L00P:4 
INSIDE LOOP:? 
INSIDE L00P:10 
INSIDE L00P:13 
INSIDE LOOP: 16 
INSIDE L00P:19 
UftLUE AFTER LOOP: 22 

READY 

Figure 4. 

This loop has a STEP value of 3, and, unlike the 
previous examples, does not end exactly at the "TO" 
parameter value. You can see that the variable X is 
incremented by 3 each time the loop is executed, 
and, as soon as it exceeds the "TO" value of 20, the 
loop terminates. Note that after the loop ends, the 
value of the variable is ALWAYS greater than the 



18 FOR EUER=1 TO 2 
28 EUER=8 
39 NEKT EUER 



Figure 7. 

Figure 7 would normally terminate properly, but 
the loop variable EVER is being reset to zero inside 
the loop. When the NEXT statement increments the 
loop variable, it never gets higher than 1. This pre- 
vents the loop from terminating. 

Leaving the nest. 

FOR/NEXT alone is a pretty powerful structure, 
but you can use several FOR/NEXT loops with what 
is known as NESTING for complex control loops. 

Nesting is simply the act of performing one FOR/- 
NEXT loop inside of another. Figure 8 is a short 
demonstration of how nesting works. 

(continued on next page) 
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T-IB FOR Ll=l TO 

28 PRIMT "LOOP 

r30 FOR L2=l TO 

48 PRINT "LOOP 

Lse NEXT L2 

p6e FOR L3=l TO 

78 PRIHT "LOOP 

«"80 HEXT L3 

>— 98 NEXT LI 



';li 

';L2 



5 
3:";L3 



Figure 8. 

This program has three loops, two of them inside 
the third. The Unes to the left of the listing show the 
loop control flow. Note that these control lines do 
not intersect. You can build loop structures as com- 
plex as you like, but you must remember to termi- 
nate the inner loop before the outer loop. Figure 9 
shows an example of an improperly structured 
nested loop. 

f— 18 FOR K=l TO 18 
1 p28 for V=2 to 28 STEP 2 
I |38 PRINT X,Y 
H-48 NEXT X 
»^8 NEXT Y 

Figure 9. 

You can see by looking at the control flow lines 
that Figure 9 violates the non-intersecting control 
rule. If executed, this program will give an ERROR- 
13 (no matching FOR statement) at Line 50. This is 
because the system was confused by the improper 
FOR/NEXT structure. 

Figure 10 shows a useful routine which will clear 
a two-dimensional numeric array to all zeros. 

18 DIN ARRAY 118,20) 
28 FOR X=8 TO 18 
38 FOR Y=8 TO 28 
48 ARRAYCX,Y)=8 
58 NEXT Y 
68 NEXT X 

Figure 10. 

When an array is DIMensioned, it may contain 
"garbage" and cause problems later in the program. 
For this reason, all arrays should be zeroed before 
use. The program in Figure 10 does this in a fast and 
orderly manner by using two nested loops. If you 
print the X and Y values inside the Y loop, you'll see 
that they go from 0,0 to 10,20. Of course, the loops 
could be written to zero the array in reverse (FOR 
X=10 TO STEP -1, FOR Y=20 TO STEP -1) 
with the same results. 

How about a useful example? 

Here's a program that illustrates the principles 
discussed and is also a nice little utility. Figure 1 1 is 
a handy-dandy hexadecimal to decimal converter 
program. It will convert any base 16 number to base 
10. The base 16 number can be up to 9 digits long. 
Simply enter the hex value when prompted, and the 
program will print its decimal equivalent. If the 
number you enter is not a valid hex value, your entry 
will be displayed with the offending character high- 
lighted in inverse video. 



18 REM KMMMKKKKMMKMMKmCKlCmClCMlCmtKKM 

28 REM * HEX-TO-DECIMAL CONUERTER « 

38 REM « BASIC TRAINING * 

48 REM « ANALOG COMPUTING ttl7 « 

58 REM MMKmtKKKlClCMltKMMKKICKKMKKMlCKKK 

88 DIM HEX$C16),IN$C18) 

78 HEXS="8123456789ABCDEF" 

88 ? :? "ENTER HEX NUMBER"; : INPUT INS: 

IF INS="" OR LENCIN$)=10 THEN 88 

98 DEC=8 

188 FOR CHAR=1 TO LEHCINS) 

118 FOR L00XUP=1 TO 16 

128 IF IN$(CHaR,CHAR)=HEXStLOOKUP,LOOK 

UP) THEN 168 

138 NEXT LOOKUP 

148 TRAP 15e:IN$(CHAR,CHAR)=CHR$(ASC(I 

N$ CCHAR, CHAR) ) 4128) 

150 ? "QINPUT ERROR - ";IN$:TRAP 48888 

:GOTO 88 

168 DEC=DEC«164fL80KUP-l) 

178 NEXT CHAR 

188 ? "DECIMAL VALUE :"; DEC iGOTO 88 



CHECKSUM DATA 
(see p. 15) 

18 DATA 335,781,824,284,343,698,126,79 
4,121,293,77,491,389,145,519,6852 
168 DATA 468,182,682,1324 

Figure 11. 

Line 60 DIMensions the two strings used by 
the program. IN$ is used to hold the hex value 
entered by the user. HEX$ is used to hold the 16 
hexadecimal digits. This is used as a lookup 
table for the conversion. 
Line 70 places the hexadecimal digits 0-F 
into HEX$. 

Line 80 accepts a hexadecimal number from 
the keyboard, places it into IN$, and checks its 
length. If the string is empty or its length is 
greater than nine digits, the program returns to 
Line 80 to accept another value. 

Line 90 sets the variable DEC to zero. 
When the conversion is complete, DEC will 
contain the decimal equivalent of the hex 
number entered. 

Line 100 initializes a FOR/NEXT loop 
which ranges to Line 170. This is the outer loop 
of a two-loop nest. As you can see, its loop value 
is from 1 to the number of characters in IN$, 
with the default STEP value of 1. Each time this 
loop is executed, CHAR will point to the next 
character in IN$, allowing each character to be 
examined in sequence. 

Line 110 starts the second FOR/NEXT 
loop, the inner loop of the two-loop nest. This 
loop assigns the variable LOOKUP the values 
from 1 to 16, with the default STEP of 1. LOOK- 
UP will be used to point to successive characters 
in HEX$ to see if they match the individual 
characters of IN$. 

Line 120 compares the character of IN$ 
indicated by CHAR to the character of HEX$ 
indicated by the variable LOOKUP. If the char- 



L\;co Computer Marketing & Consultants 

TOLL FREE 800-233-8760 



TO ORDER 

CALL US 



In PA 1 717-327-1824 



PRINTER PRINTER PAPER 

INTERFACING AVAILABLE 

■Available lor IBM PC, Apple, Atari, Vic 20 i Vic 64 



SAVE PRINTERS 



EPSON 



OKI DATA 



CITOH 



LETTER QUALITY 

SMITH C0R0NATP2. . .$449.00 

DIABLO 630 ..$171 9.00 

ALPAHCOM 42 S89.00 

ALPHACOM 81 $1 29. OO 

NEC 8023 $369.0O 

NEC 8025 $699.00 

NEC PC-8200 
COMPUTER $CALL 



RX-80 $SAVE$ 

RX-80Fr ON 

FX-80 In-Stock 

FX-100 EPSON 

MX-80FT PRINTERS 

MX-1 00 $$CALL$$ 

MANNESMANN 
TALLY 

SPIRIT 80 $CALL 

MT160L $CALL 



80 $SAVE$ 

82A CALL for 

83A LOWEST 

84 PRICES 

92 on these 

93 In-Stock 

PACEMARK 2350. . . PRINTERS 

ATARI 850 

REPLACEMENTS 

IN-STOCK 



GORILLA GX100 $179.00 

PROWRITER8510 ...$339.00 

PROWRITER II $659.00 

8600 $1025.00 

STARWRITER $1 099.00 

PRINTMASTER $1499.00 

STAR MICRONTICS 

GEMINI 10X $269.00 

GEMINI 15X $CALL 

DELTA 10 $479.00 



MODEMS 



ANCHOR MARK I 
I ANCHOR MARK I 
I HAYES SMART .. 
I HAYES MICRO II 
Micro Bit 

/IPP-10O0 

NOVATION 
1 CAT 

D-CAT 

JCAT 

APPLE CAT II , ... 

212 APPLE CAT 



,S79.00 
I. S79.00 
.S239.00 

S309.00 

$129.75 

SI 44. 00 
$155.00 
S115.00 
S279.00 
$58900 



MONITORS 

Sakata Color $229.00 

Amdek Color I $275.00 

Amdek 300 Green $149.00 

Amdek 300 Amber $149.00 

Gorilla Green $99.00 



PARKER BROTHERS 

Tutankham R $33.75 

Super Cobra H $33.75 

Astro Chase R $33.75 

Frogger R $33.75 

QBert R $33.75 

Popaye R $33.75 

Risk R $42.75 

CtiassR $42.75 

SPINNAKER 

Story Maclilne R $28.75 

Face Maker R $24.75 

Kinderomp R $20.75 

Fraction Fever R $24.75 

Delta Drawing R $26.75 



SSI 

Battle of Shilo C/D $26.75 

Tigers In the Snow C/D $26.75 

Battle tor Normandy C/D . . $26.75 
Knights of the Desert C/D . $26.75 
Cosmic Balance C/D $26.75 

ON-LINE 

Frogger $24.95 

Wizard a Prin $26.95 

ROKLAN 

Wizard of War $29.75 

Gorf $29.75 

Delux Invader $27.95 

BIG 5 
Miner 2049 $32.75 

APX 3R Math $19.95 

Typo Attack $24.95 

Family Budget $19.95 

F. Cash Flow $19.95 

EASTERN HOUSE 
Monkey Wrench 2 $52.75 



BRODERBUND 

Bank Street Writer D $49.75 

AE D $24.75 

Apple Panic D $23.75 

Chopllfter ROM $32.75 

David's Midnight $24.75 

Stellar Shuttle C/D $1 8.75 

Ft. Apocalypse $24.75 

SYNAPSE 

BLUE MAX C/D $24.75 

Ft. APOCALYPSE C/D. . . $24.75 
PHAROAH'S CURSE C/D ... $24.75 

DUST COVERS 

800 $3.99 

400 $3.99 

1200 $3.99 

410 $3.99 

810 $3.99 

1050 $5.99 

PROWRITER $5.99 

GEMINI 10X $5.99 

PERCOM DISK $5.99 



ALIEN GROUP 

Voice Box 2 . $99.75 

DON'T ASK 
Sam $41.75 

Abuse $15.95 

Toleatrl $27.95 

Poker Sam ..$24.95 



PACMAN . 
DONKEY KONG 

DIG DUG 

DEFENDER... 
CENTIPEDE .. 



EPYX 
GATEWAY TO 

ASPHI R $28.75 

JUMPMAN JR R $28.75 

PIT STOP R $28.75 

GATEWAY TO 

ATARI 

Computers for people; 
o 

600X1 $CALL 

800XL for 

1400XL... Lowest 
1450 Prices 

1020 PRINTER NOW 

1025 PRINTER IN 

1027 PRINTER STOCK 

1050 DISK DRIVE ....$SAVE$ 

1010 RECORDER $74.75 

DEADLINE -.$34.75 
ENCHANTER $34.75 
INFIDEL .$34.75 

PLANETFALL .$34.75 
STAR CROSS -.$34.75 
SUSPENDED. $34.75 
WITNESS ..$34.75 
ZORKI ...$34.75 



$29.75 
$29.75 
$29.75 
$29.75 
$29.75 



.$34.75 



BLANK DISKETTES 
ELEPHANT 

single Side SD (10) $17.75 

Single Side DO (1 0) $21.75 

Double Side DO (1 0) $28.75 

MAXELL 

MDI(IO) $JB.75 

MDM(IO) $38.75 

CERTRON CASSETTES 

CC-10 12 for $15.00 

CC-20 1 2 lor $1 7.89 

INNOVATIVE CONCEPTS 

Disk Storage (holds 10).... $4. 95 

Disk Storage (holds 15) $9.05 

Disk Storage (holds 50).... $26. 05 



TRAK DISK DRIVES 

AT-D1 $37^.00 

AT-D2 $399.0O 

PRINTER CABLE $22.95 

Software (or ATD-2 ....$22.95 



RANA 
DISK DRIVE 



COMPUTER CARE 

BIB 

5V. DISK DRIVE 

CLEANER $12.75 

COMPUTER CARE 

KIT $19.75 



HARD DISK 
DRIVES for 

APPLE IBM-PC 

5MEG $1349.00 

10MEG ...$1599.00 
15MEG ...$1999.00 
20MEG ...$2359.00 

■AticI S il' '«' '"' '"S HO (1. vi-s 

TEXAS 
INSTRUMENT 

Disk Drive... $245.00 




FOR ATARI 
COMPUTERS 



AT88S1 .. 
AT88S2 .. 
AT"S1PD. 
RFD40S1 . 



.$329.00 
.$535.00 
.$439.00 
.$399.00 



RFD40S2...$675.00 
RFD44S1...$449.00 
AT88 doubler 



09 TO ORDER 

CALL TOLL FREE or send ord«r to 

800-233-8760 ^TboTsZT 

ICustomer Sen/ice 1-717-327-1825 Jersey Shore PA 1774C 



POLICY 

In-stock items shipped within 24 hours of order. Personal 
checks require four weeks clearance before shipping. No 
deposit on C.O.D. orders. Freeshippi ng on prepaidcash orders 
within the continental U.S. PA residents add sales tax. All 
products subject to availability and price change. Advertised 
prices show 4% discount offered for cash, add 4% for Master 
Card or Visa. DEALER INQUIRIES INVITED. 
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acters match, the program exits the inner loop 
with a GOTO instruction to Line 160. If no 
match is found, the program continues on to the 
next Une. 

Line 130 increments LOOKUP to the next 
character of HEX$. If there are more charac- 
ters, the program will loop back to Line 120 to 
continue the hex digit comparison. If all hex 
digits have been checked, LOOKUP will exceed 
16 and the program will continue at Line 140, 
the error routine. 

Line 140 is executed if the character entered 
was not found in HEX$. Let's assume the letter 
"W" was entered. This is obviously not a valid 
hexadecimal digit, and would not be found in 
HEX$. When this happens, Line 140 adds 128 
to the invalid character's ATASCII value, 
changing it to inverse video. If the character is 
already inverse, the TRAP statement avoids any 
BASIC error messages by continuing at Line 
150. 

Line 150 prints the error message and the 
value entered by the user, with the invalid char- 
acter shown in inverse. It then turns off the 



TRAP statement started in Line 140 and exits 
the FOR/NEXT loop with a GOTO 80. 

Line 160 is reached when a valid character is 
found and matched to a character in HEX$. 
LOOKUP contains the decimal value of the hex 
digit plus 1. For example, the value zero in 
HEX$ has a LOOKUP value of one, and the 
value F has a LOOKUP value of 16. This line 
multiplies the DEC value by 16 and adds the 
value of LOOKUP minus one. The multiply by 
16 simply allows for the position value of each 
base 16 digit. 

Line 170 increments the CHAR variable, 
thereby pointing to the next character of IN$. If 
there are more characters, the program loops 
back to Line 110 to search for the new charac- 
ter's hex value. If not, all of IN$ has been 
scanned, and the program continues to Line 
180. 

Line 180 prints the final value of DEC, the 
decimal equivalent of IN$. After printing, the 
program returns to Line 80, where the user may 
enter another hex number. D 



Put a Monkey Wrench 
into your ATARI 800 

Cutyour programming time from hours to seconds, and 
have 18 direct mode commands. All at your fingertips 
and all made easy by the MONKEY WRENCH II. 
The MONKEY WRENCH II plugs easily into the right slot of 
your ATARI and works with the ATARI BASIC cartridge. 

Order your MONKEY WRENCH II today and enjoy the 
conveniences of these 18 modes: 



Line numbering 


• Copy lines 


Renumbering basic line 


• Special line formats and 


numbers 


page numbering 


Deletion of line numbers 


• Disk directory display 


Variable and current 


• Margins change 


value display 


• Memory test 


Up and down scrolling of 


• Cursor exchange 


basic programs 


• Uppercase lock 


Location of every string 


• Decimal conversion 


occurrence 


• Machine language ^X 


String exchange 


monitor A-* 


Move lines 


• Hex conversion V^ 



The MONKEY WRENCH II also contains a machine 

language monitor v^/ith 1 6 commands that can be used 

to interact with the powerful features of the 6502 microprocessor 
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NEW DISK DRIVES FOR THE ATARI 



by Brian Moriarty 



Buying a disk drive for your Atari was easy back 
in the old days. You simply waited until your local 
dealer got a fresh shipment of 810s, and hoped he 
wouldn't sell them all before you got there. A few 
venturesome types might opt for a Percom and 
indulge in the luxury of double density. But for the 
majority of users, Atari's lovable old clunker has 
been the drive of choice since early 1980. 

Things are a lot different now. The 810 is history, 
and retailers are offering all sorts of sexy-looking 
alternatives, some at very attractive prices. We 
decided it was time for ANALOG to peek at the 
most popular of the new drives and find out how 
they stack up in terms of performance and value. 

The chart on page 77 compares the basic features 
of the Atari 1050, Rana 1000, Trak AT--D2 and Indus 
GT disk drives. Space limitations do not permit a 
more detailed analysis of so many products; contact 
the manufacturers at the addresses provided if you 
need more information. 

The following paragraphs are included to help you 
interpret our comparison data, and to explain how 
some of the more exotic statistics were obtained. 

Density modes. 

"Density" refers to the amount of information 
you can store on a single disk. Three things deter- 
mine the density of a disk format: the number of 
bytes in each sector, the number of sectors per track 



and the number of tracks per disk. 

All of the drives in this survey employ a 40-track 
format. Single-density disks have eighteen 128-byte 
sectors per track, for a total capacity of 18*128*40 
or 92,160 bytes. Double-density uses exactly the same 
format, except that the sectors are twice as large (256 
bytes apiece). This yields a capacity of 184 kilobytes 
per disk. 

There's third Atari format called medium density or 
1050 density, which is supported mainly by Atari's 
1050 Disk Drive and DCDS 3.0. It's a weird scheme 
that uses 26 128-byte sectors per track, for a total 
capacity of approximately 133 kilobytes. The Rana 
1000 and Indus GT drives can read and write 
medium-density disks, but don't expect the 1050 
format to become very popular among Atari users. 

Built-in diagnostics. 

Most of the new Atari drives contain self-diagnostic 
routines that check out the drive mechanism and/ or 
electronics to make sure they're working okay. The 
Trak and Indus drives perform these tests automati- 
cally every time you turn them on. The Rana 1000 
lets you access each test individually. 

Track indicator. 

A track indictor is a digital readout that informs 
you which of the 40 disk tracks the drive is currently 
accessing. I've been using an 810 without a track 
indicator for three years and never felt any need for 
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one. Most track indicators are also used for error 
messages and other legitimate purposes, so we'll for- 
give the manufacturers for this otherwise pointless 
gimmick. 

Write-protect switch. 

A write-protect switch lets you manually disable a 
drive's writing and formatting functions, making it 
impossible to accidently erase important data. An 
indicator light reminds you when the write-protect 
option is enabled. Sure beats those little gummy 
labels, although they'll still work if you want to keep 
using them. 

Power switch location. 

A disk drive's power switch ought to be up front, 
where you can reach it easily. Period! 

Formatting and access time. 

The BASIC benchmark program in Listing 1 was 
written to compare the performance of the Atari, 
Rana, Trak and Indus drives. Listing 2 is the assem- 
bly cource code, composed with MAC/65. The 
benchmark was run five times on each disk drive, 
and the results averaged to yield the figures shown in 
our table. 

The first part of the program finds out how long it 
takes the drive to write a "raw" (non-DOS) format 
on a disk. The Atari's jiffy clock is used to precisely 
time the formatting speed to within l/60th of a 
second. 

The second part determines how long it takes the 
drive to access data under "worst-case" conditions. 
First, the drive is commanded to read sector #1, 
located on the outermost track of the disk. As soon 
as the drive acknowledges receipt of sector 1, the 
system clock is set to zero and the drive is told to 
fetch sector 720, which is on the innermost track. A 
timer reading is taken as soon as Sector 720 is 
received. The clock is then reset to zero, the drive 
runs back to fetch sector 1 again, and a second 
reading is taken upon receipt. This back-and-forth 
cycle is repeated 8 times; the clock readings are 
added together and divided by 16 to "smooth" the 
result. 

Noise leveL 

The access-time test made the drive mechanisms 
work fairly hard, thereby providing a good oppor- 
tunity to judge the noise performance of the drives. 
The ratings in our comparison table are relative to 
the familiar (and very noisy) Atari 810. 

Operating systems. 

A disk operating system or DOS is a machine- 
language program that tells your computer how to 
communicate with the disk drive. Our table gives the 
name and manufacturer of the DOS supplied with 
each drive. These DOSes are so new that we haven't 
had time to test them yet. Look for a full report on 
new operating systems, disk utilities and drive 
enhancements in a future issue. 



A note on compatibility. 

Each of these new drives is designed to be fully 
compatible with any program that uses standard 
Atari I/O procedures to access the disk. Assuming 
that your drive is aligned properly, you should have 
no trouble reading any disk written on anybody 
else's drive, regardless of make. 

"Copy-protected" disks are another story. Some 
of the big-shot game companies are relying on 
undocumented quirks in the old 810 operating sys- 
tem to keep their products secure. Such disks may 
refuse to boot on a non-810 drive. Don't pound on 
your innocent drive if this happens! Blame the soft- 
ware publishers, who continue to disregard the 
existence of "alien" drives at their own peril. The 
only way to tell whether a given disk is compatible is 
to boot it up and pray. And don't be afraid to 
demand your money back if a "protected" program 
won't load. 

You're going to be living with your new disk drive 
for a long time. Before you plunk down hundreds of 
dollars, it's a good idea to get your hands on a sample 
and play around with it for a few minutes. Things to 
consider include: 

Ergonomics. Is it easy to insert disks into the slot? 
Can you pull them out without running into the 
bathroom for tweezers? Do the switches provide pos- 
itive feedback when you push them? Can you tell the 
indicators apart without squinting? 

Documentation. Does the owner's manual make 
sense? What do they tell you about the disk operat- 
ing system? 

Cosmetics. Does the drive match the decor of 
your exquisite 17th-century drawing room? Failing 
that, you should at least make sure there's enough 
room for the unit on your computer desk. 

Support. What will you do if the drive breaks 
down tomorrow? What will you do if it quits the day 
after the warranty expires? You're better off asking 
now than later. 

Selecting a new disk drive from so many conten- 
ders won't be easy. But once the choice is made and 
the check clears, you'll wonder how you ever got 
along without one. D 

Listing 1. 

10 REM K DISK DRIVE BENCHMARKS 

29 FOR 1=1536 TO 1678 

30 REftO BVTEnPOKE I,8VTE:HEKT I 
40 ? "TIME TO FORMAT 0I5K:" 

50 ' U5Rfl536J;" JIFFIES" 

60 ? "M0RST-CA5E ACCESS TII« : " 

70 ? USRC1575J/16;" JIFFIES AVERAGE" 

80 END 

90 REM * MACHINE LANGUAGE DATA 

100 DATA 104,165,1,141,1,3,169 

110 DATA 33,141,2,3,169,128,141 

120 DATA 4,3,169,4,141,5,3 

130 DATA 169,0,133,19,133,20,32 

140 DATA 83,228,165,20,133,212,165 

150 DATA 19,133,213,96,104,169,1 

160 DATA 141,1,3,169,82,141,2 

170 DATA 3,169,128,141,4,3,169 
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180 DATA 4,141,5,3,216,169,8 

199 DATA 133,212,133,213,169,7,133 

290 DATA 293,169,1,141,19,3,169 

219 DATA 0,141,11,3,32,83,228 

220 DATA 169,0,133,20,169,208,141 
239 DATA 19,3,169,2,141,11,3 

249 DATA 32,83,228,165,29,24,101 
259 DATA 212,133,212,144,2,239,213 
269 DATA 169,9,133,29,141,11,3 

279 DATA 169,1,141,19,3,32,83 

280 DATA 228,165,29,24,191,212,133 
299 DATA 212,144,2,239,213,198,293 
399 DATA 16,185,96 



CHECKSUM DATA 
(see p. 15) 



19 DATA 126,617,668,643,272,178,539,25 

7,57,374,665,864,628,955,518,7361 

169 DATA 226,439,371,955,612,164,713,3 

53,481,937,376,224,927,957,268,7994 



e588 
8598 



Listing 2. 



0188 ; ORIUE BGNCfl1AI9<S 

8118 

8128 

8138 

6148 

8158 

81^8 

8178 

8188 



Resident disk handler equates 



8218 
8228 
8238 
8248 
8258 
82ii8 
0278 
8288 
8298 
8388 
8318 
8328 
8338 
8348 
8358 
8368 
8378 



6UNIT = $8381 

DCOmO = $8382 

DBUFLO = $8384 

D8UFHI = $8385 

MUXl = $838A 

DAUX2 = $8386 

OSKIW = $E453 

^K0= $52 
FORMAT = $21 

^I6IN = $8<^8 
BUFFER = $8488 
INDEX = $CB 
TICK= $14 
TOCK= $13 
FR8= $D4 

' *= ORIGIN 

I TEST #1 



drive i 

comand reoister 
Isb of bu-fter addr 
nsb (H bu-ffer addr 
Isb o-f sector # 
fssb o-f sector # 
disk handler entry addr 

READ SECTOR comand 
FOmAT DISK comand 

start of executable code 
ivmny buffer for sector data 
loop index register 
Isb of system timer 
nsb of system timer 
function return register 



PLA 



; f arguments; ignore 



8398 
8488 
8418 
8428 
8438 
8448 
8458 
M6» 
8478 
8488 
8498 
8588 
8518 
8528 
8538 
8548 
8558 
8568 
8578 



LDA II 

STA DUNIT ; specify *ive II 

LOA IFOffttT 

STA DCOWD ; specify FmViT ccnnand 

LDA I <BUFFER 

STA DBUFLO : tell the disk handler 
LDA I >BUFFER ; )*ere our 128-byte 
STA DBUFHI ; dummy buffer is 



LDA 18 
STAT(0 
STA TICK 

m DSKIW 
LDA TICK 
STA FR8 
LDATOCK 



; zero systeti timer 
; let OS format disk 



8616 
8628 
8638 
8648 
8658 
8668 
8678 



8696 
6788 
8718 
6728 
6738 
8746 
6758 
6766 
8778 
8788 
8798 



8828 
8838 , 
8848 BACK 
8858 
8866 



STA FIW+1 ; 
RTS ; 

TEST 12 



PLA 

LDA II 
STA DUNIT 

LDA IREAD 

STA Dcorwo 

LDA I <BUFFER 
STA DBUFLO _j 
LDA I >KiFFER 
STA D^HI 

CLD 
LDA 16 
STA FR8 
STA FR8+1 
LDA 17 
STA INDEX 



LDA 
STA 
LDA 
STA 



II 

DAUXl 
16 
DAUX2 



8898 



JSR dmw 



8916 
8928 
8938 
6948 
8958 
8968 
8976 



8998 



LOA 
STA 

LDA 
STA 
LDA 
STA 



JSR DSKIW 



1618 
1828 
1636 
1648 
1858 
1666 
1676 
1686 
1696 
1166 
1118 
1128 
1136 
1146 
1156 
1168 
1178 
1188 
1198 
1286 
1218 
1226 
1238 
1248 
1256 
1266 
1276 
1288 
1298 
1368 
1318 
1326 



LDA 
CLC 
ADC 
STA 
BCC 

lie 



^ORTH 



LDA 
STA 

STA 
LDA 
STA 



TICK 

FRe 
FR8 
FORTH 
FR8tl 



18 

TICK 

DMK2 

II 

OAUXl 



m DSK»«; 



LDA 
CLC 
ADC 
STA 
KC 
INC 



TICK 

FR8 
FRe 
NEXT 
FR8+1 



HEXr 



DEC 
RTS 



IWEX 
BACK 



16 
TICK 

I <728 
0AIJD<1 
I >728 ; 
DAUX2 ; 



function return register 
all done 



I arguments; ignore 
specify (b'ive II 
specify READ comand 



tell the disk handler 
; where our 128-byte 
dumy buffer is 

for safety 



zero sum 
init index 



point to sector 1 
and fetch it 

zero timer 



now point to 
sector 720 

and fetch that 

get reading 

add to previous 
readings 



zero tiaer 

point to sector 1 

fetch it 

get new tine 
add to previous 
readings 



loop 8 tiiMS 

and return to BASIC 



put timer reading 
into BASIC'S 




ATARI 1050 




RANA 1000 




IRAK AT- D2 




INDUS GT 



L 
O 
W 



L 
O 
W 



2024 



1094 



1354 



36.9 



25.0 



56.4 



Rana 
Smart- 
DOS 



OSS 

DOS XL 

2.2 



OSS 

DOS XL 

2.2 



Matches cosmetics of 
Atari XL computers. 



Independent disk formatting. 

User- programmable 
diagnostics. 



Built-in parallel printer 
interface (cable additional). 

2K printer buffer (expandable). 

utilities and game software. 

Optional "Turbo Software" 

on EPROM (S60 additional). 



"Beeping" function switches. 

Word processing, spread- 
sheet and database software. 

Hinged dust cover. 

Hard carrying case. 



31/2 X 

71/4 X 

12 



2y4X 
7x 
IOV4 



31/2 X 
8x 
11 3/4 



23/4 X 

7x 
11 



D 
A 
Y 
S 



120 

D 
A 
Y 
S 



90 

D 
A 
Y 
S 



Y 
E 
A 
R 



GC 
HI 



449 
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449 
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ENCOUNTER! 
by Paul Woakes 
SYNAPSE SOFTWARE 
5221 Central Avenue 
Richmond, California 94804 
32K Disk $34.95 



by Carl Firman 



Come with me for a moment. Let's step across the 
threshold to a galaxy far, far away . . . 

Your starship is in orbit around a strange new 
world. This one wasn't even on the charts. It's 
ancient — billions of years old. Aside from a few 
carnivorous plants, no life forms have been detected. 
So how to explain the hundreds of strange round 
pillars, spread across the plains in a vast grid? They're 
obviously artificial, and vaguely reminiscent of the 
obelisks on Easter Island back on Terra. You're about 
to find out what they are, because you've just been 
selected to go planetside with the exploration team. 

Your assignment is to pilot one of your starship's 
antigrav Seekers and defend the explorers. Naturally, 
your presence is only precautionary. The Treaty of 
2076 specifically prohibits the use of destructive 
weapons unless attacked. That same agreement limits 
your arsenal to manual phasers and standard deflec- 
tor shields — no computer-controlled weapons 
allowed. 




The landing vehicle slips silently out of the hanger 
bay, glides towards the planet's surface and lands on 
the edge of the flatland. Through the viewpoint you 
can see some of the strange pillars against the distant 
horizon. Your job is to survey this area before the 
exploration team can disembark. 

It feels good to be back at the controls of a Seeker. 
She's a tidy little craft. Smooth, efficient ... and 



potentially very deadly. You approach and pass the 
first of the pillars. Suddenly your scanner shows a 
blip. You are not alone! 

Is it one of the other Seekers? It shouldn't be, and it 
isn't. A yellow saucer whizzes past your viewport. 
Your blue "Attack" indicator flashes on, and a bolt 
of raw energy smashes into your craft. The viewpoint 
sizzles as the shields absorb the force of the strike. 
You pull back violently on the stick, only to find 
yourself surrounded by the menacing pillars! Only 
one course of action can save you now. 

Battle! 

Another saucer approaches. You line it up in your 
sights and squeeze the fire button. A phaser blast 
finds its mark, and the enemy shatters into a cloud of 
whirling fragments. Whew! At least the things can be 
destroyed. But these saucers aren't always that easy 
to kill. They weave and sway like drunken Cygian 
bouncers. You nevertheless manage to pick off sev- 
eral more, duckling behind pillars to avoid their 
searing fire. 

Your Seeker's red "Missile" indicator has just 
come on. Sure enough, an alien projectile is scream- 
ing straight into your viewport. You line up the sights 
and fire, but the missile dodges, and you're hit from 
the side — the rear — and another strike head on! 
The shield indicator now shows a big fat "0." 
Another saucer fires — you swerve to evade, but too 
late. The viewport flashes white and a message 
appears. Game Over. Your hand is sweating as time 
and space bend back into reality. 

You've just had your first Encounter! with a mil- 
itary obstacle course — a diabolical machine con- 
ceived by a race of beings extinct for half a million 
centuries. This electronic training ground was built 
to sharpen the skills of their greatest warriors. Press 
the START key on your Atari, and you'll find your- 
self once again thrown into the thick of combat, your 
battle reflexes locked in a nerve-wracking test to 
destruction. 

The graphics and sound in this 3 dimensional sim- 
ulation are stunning. There are eight training levels, 
each with a differently colored landscape and better 
alien attack strategies. After clearing out all of the 
saucers and missiles on one level, you must travel 
through an extradimensional "gate" to reach the next 
level of difficulty. Avoid those energy spheres flash- 
ing past your Seeker, or you'll find yourself back in 
the previous level. And if you happen to notice 
another Seeker slugging it out in the grid . . . please, 
don't shoot me. D 
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by Joel Gluck 



Yes, once again, it's time for Our Game, the 
column that brings you more of what you read 
ANALOG for! In this edition: Viewer Mail, another 
look at the components of good games, and Debugi- 
fi cation! 

For those of you who are continuing readers of 
Our Game, you may notice that we still haven't 
started writing "our game" — the game composed of 
your mailed-in ideas. Purely to avoid being sent hate 
mail or dead flowers, let me assure you that devel- 
opment of our game will definitely begin in the next 
Our Game column. I promise! 

In the meantime, please continue to send me mail. 
Reader response so far has not been overwhelming, 
so I'm still in need of more good, usable ideas. 

Viewer mail. 

I received this letter from Theodora Brown of New 
York City: 

Since you asked for comments, 1 assume you're pre- 
pared for some negative ones. Personally, I'd prefer if 
you'd stick to programming instruction and keep your 
biases to yourself. You are dead wrong on a number of 
points: 

People having the most fun in the arcades are not 
usually with other people. Sometimes they are, and some- 
times they aren't; there is no correlation. And even if they 
are, so what? 

Game manufacturers are not stupid. They know a 
whole lot more about their market than you do. They are 
not "hurting themselves" by focusingonmaleteenagers. If 
there were a demand for programs for senior citizens, 
they'd write programs for senior citizens quick enough. 

Violence is bad only when it acts on people or things not 
designed for it. Hitting a baseball is violent, but it's not 



harmful. Get the difference? Do you think that hitting a 
baseball encourages a youngster to go home and hit a vase 
or his baby brother with the bat? If hitting a baseball is 
harmless, then zapping a Zylon is also harmless. Where 
did this anti-violence kick come from anyway? It's quite 
boring. 

I'm glad that somebody finally wrote a letter that is 
at odds with some of the points I've made in Our 
Game. I'll argue against what Theodora wrote, but 
let me say first that I hope I receive more letters like 
this one. Our Game would be worthless if it pre- 
sented only my point of view. 

First off, Theodora suggests I stick to program- 
ming instruction and keep my biases to myself. 
Unfortunately, that does not jive with the purpose of 
this column. Our Game is not meant to serve as 
programming instruction, although it does contain 
elements of that. Our Game is a tutorial on the 
design and programming of computer /video games 
— as well as an open forum on the state of computer /- 
video games. If straight programming instruction is 
what you want, read BASIC Training, Boot Camp 
or any of the other excellent tutorials to be found in 
ANALOG Computing. 

As for my expressing biases: The column would 
probably not be very interesting if I kept my opinions 
to myself. Much of what I write is designed to elicit 
reader response. The mere fact that Theodora dis- 
agreed with my opinions and wrote a letter means 
that what I am doing is working. 

I disagree with Theodora's point that there is no 
correlation between having more fun in arcades and 
being with other people. My opinion is based on my 
observations in numerous arcades and game rooms, 
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and my own personal experiences. Man is a social 
animal, despite what some computer or video game 
junkies may think. Also, I think that Theodora's 
point that it doesn't matter either way is also wrong: 
Only when game designers and manufacturers realize 
the role of the human interaction that takes place in 
arcades (and at home) will we see better multiple- 
player games that are truly interactive. The impor- 
tance of having games like this is clear; interactive 
games help teach social and emotional lessons, where- 
as single-player games tend to be far less beneficial. 
Not everyone worries about someone who has few 
friends and spends too much time playing video 
games — but it's an important issue nonetheless. 

Theodora also pointed out that there is no demand 
for game programs for senior citizens. I agree. How- 
ever, 1 picture things the other way around. From my 
point of view, most game manufacturers have never 
seriously tried to promote games that appeal to dif- 
ferent age groups. Senior citizens may be an extreme 
example, but certainly an effort can be made to target 
games to young children or to adults — not games 
that are mere variants of the standard arcade 
chase'em-down-shoot'em-up, but rather games with 
social and educational value. 

Not that everyone is ignoring the issue. Atari is one 
company that has made some effort along these lines. 
Working with the Children's Television Workshop, 
Steve Wright of Atari helped produce a batch of 
excellent educational young children's games for the 
Atari 2600. 

My point is that it does not matter whether or not 
there is a demand for games of this sort — it is up to 
game manufacturers to create the demand. All it 
takes is creativity and the will to pioneer new 
markets. 

As for the question of violence in video games: I 
suspect that a violent game's effect on a person (espe- 
cially a child) is similar to the effects of television 
violence. The two are comparable because a video 
game's lack of realism is compensated for by its being 
interactive. Unlike television, in a video game you are 
the one who is killing or being killed. It is difficult, 
however, to prove that violent video games are more 
harmful than nonviolent ones. 

But I have a better reason for avoiding violent 
games. They are trite. No theme has been more over- 
used in the realm of video games than kill-or-be- 
killed, especially in the form of what is ordinarily 
called the "shoot'em-up." It is in this sort of game 
that we see the game manufacturers appealing to the 
lowest common denominator. There are rarely im- 
provements in the game ideas themselves, but only in 
the technology of the implementation. Atari's Star 
Wars is a fine example; behind all of its high-tech 
trappings, the game is essentially just another 
shoot'em-up. 

So, this "anti-violence kick" that Theodora com- 



plains about is my reaction to the lack of creativity on 
the part of game designers and manufacturers. In our 
game, we will try to avoid hackneyed themes and 
search for new and better ones. Why? Because it's a 
challenge. 

I also received this letter from Eric Hansotte of 
Glenshaw, Pennsylvania: 

I believe that the right kind of board game can entertain 
almost anyone and never have him/her become sick or 
frustrated with it. . .Just compare chess, checkers, and 
Monopoly to PacMan/ hlo contest! 

So how about a board-type computer game that incor- 
porates the sound, graphics, and other game-playing 
capabilities of the computer as an added dimension. This 
might be a game in which the ' 'board' ' is the main screen. 
Players advance around a pattern by some cleverly deter- 
mined method of movement as they accumulate points, 
money, awards, or whatever. At certain points throughout 
the board pattern there should be "stations," similar to 
those in a regular board game, that might ask you to pick a 
card. Here, at these stations, is where we might have the 
sound and graphics come into play, as the computer would 
go to a different graphics mode and let the player perform 
a task . . . The task would have to be something interest- 
ing, the outcome of which would be good or bad for the 
player, such as an award or being sent back to "start." 

Great idea, Eric. Before I even learned BASIC, one 
of my favorite pastimes was designing my own board 
games, using magic markers and oak-tag paper, and 
cut-up file cards for the playing pieces. I've always 
thought it would be great to do a computer/board 
game — and it seems you've figured out a good way 
to do it. This is a definite possibility for our game. 

By the way, one of the most interesting games of 
the past year for the Atari computer was a computer/- 
board game called Archon, published by Electronic 
Arts. Player interaction in the game is beautifully 
done (although there is also a one-player option), 
and the game itself is imaginative and fun. I recom- 
mend it to anyone looking for something a little 
different. 

Barbara Baker writes from San Bernardino, Cali- 
fornia: 

1 agree that violence in games does not appeal to most 
women, but 1 think people of either sex are enchanted by 
the idea of being a hero. Here is my game idea: 

Underground Railroad. The object is to lead a 
group of slaves from the Deep South to freedom in the 
l^lorth. The size of the group is your choice: large groups 
gain more points, but small ones are easier to handle 
without losing anyone in your party. The hazards are 
environmental, such as snake-filled swamps and ice- 
packed rivers. 

There are also farms along the way where you can 
sometimes obtain food, because a well-fed party travels 
faster. All along you must evade the pursuing blood- 
hounds by various tricks such as doubling back or crossing 
water. 
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The concept might fit better in a science-fiction setting, 
where you can invent more imaginative hazards. How- 
ever, I think that presenting a heroic act without violence 
is the most broadly-appealing way to go. 

Barbara's game idea is one of the most unique and 
creative I've received. But one must keep in mind the 
Umitations we have in terms of speed and memory: it 
would be very difficult to implement a game as com- 
plex as Underground Railroad on the Atari com- 
puter in BASIC. Also, when developing a game idea, 
it helps to take it past the storyline and stage and 
consider the graphic representation. How would we 
represent (not to mention control) a group of people 
moving around on the screen? How would obtaining 
food from a farm work graphically, for example? All 
of these questions must be answered before an 
implementation can be attempted. 

That's all for viewer mail. Keep those letters com- 
ing! 

Good games, revisited. 

A while back we talked about good games. What 
makes a good game? 

The first motive of any game design should be to 
entertain. A game is not a game if it is not fun. After 
that, a game designer may have other motives: 



1 ) To educate. There is a sad lack of good 
educational software on the home computer 
market. Much of what has been produced is 
boring or poorly designed. Approaching the 
educational market from the direction of enter- 
tainment instead of education may be the best 
way to go. 

2) To simulate. Simulations can be enjoya- 
ble if designed correctly. They can be difficult to 
write, given the constraints of a microcomputer, 
unless what one is simulating can be simplified. 
Simulations that are accurate can be educational 
as well. Good examples are Chris Crawford's 
Scram and Eastern Front 1941. A common 
pitfall, though, is to assume that an accurate 
simulation is automatically fun to use; this is 
frequently not the case. 

3) To experiment. A game designer who 
desires to break free of the common computer/- 
video game form may find unexpected resist- 
ance. Douglas Crockford of Atari wrote a game 
last summer called Hollywood Medieval, an 
unusual game in which a player uses only one 
control button (the START key) to make his 
way through a maze. The maze is not visual, 
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however — it's composed of music (although 
Doug did create beautiful 3'D graphics to 
accompany the action of the game). Unfortu- 
nately, Doug's game was not accepted by the 
Atari Program Exchange, which probably found 
the game a bit too strange to sell. From my point 
of view, the purpose of a group like APX is to 
make available unique games like Hollywood 
Medieval. 

Not all experimental games fail, of course. 
One of last year's best was Bill Budge's Pinball 
Construction Set (Electronic Arts), a program 
that allows you to design complex video-pinball 
machines on the screen without having to deal 
with a complex interface. The idea was good, the 
implementation was excellent, and the result 
was unlike any other game. 

4) To make money. Almost all game writers 
have this motive in mind to some extent. Unfor- 
tunately, it conflicts in some ways with the 
motives mentioned above, especially the desire 
to experiment; the easiest way to make money in 
computer games is to play it safe. Stick to old 
forms, razzle-dazzle'em with better special ef- 
fects, and take full advantage of advertising and 
hype — that's the formula for a hit game. Fortu- 
nately, one can still be creative and make money, 
but it may be a struggle. 

There are other considerations when one talks of 
good games. How about themesl 

My dictionary equates, for the most part, 
"themes" with "topics." This works pretty well 
when speaking about video games. The theme of a 
game like Galaxians, for example, could be "outer 
space adventure." 

For many games, though, it is hard to pinpoint a 
theme. Some seem to have none at all. Take, for 
example, the prototype-game presented last month, 
called Four Letter Words. FLW was an excellent 
example of a "game-for-games'-sake." It had no 
identifiable real-world or fictional theme. This is not 
necessarily a bad thing, but people usually find it 
easier to learn and enjoy the games that have strong, 
identifiable themes — games like Joust, Centipede 
and Front Line. As a final example, one arcade game 
that seemed devoid of a strong theme was Atari's 
Tempest. 

Traditionally, games must have an object. A game 
without an object is what I like to call a "toy." A 
simple example of this is the Bounce game presented 
in the January Our Game (Issue #15). Toys are just 
like games except it is not clear that one is supposed 
to do anything in particular with them. They have no 
formal goal, like winning or achieving a high score. 

Most computer/video games use the score as the 
device for making the object of the game clear. The 
reason behind this is that most computer/video 
games are inspired by the arcades, where one plays a 



game until one loses. There is no goal to reach, no 
task to complete, only an increasing score and an 
increasingly difficult game. Recently, though, there 
have been games like Pole Position and Track & 
Field, which break away from the usual format by 
letting the game end. 

In most arcade games, the object is to "kill the 
enemy for points and avoid being killed." This is true 
of oldies like Space Invaders, Asteroids and even 
PacMan (remember, you can eat those goblins), and 
it's still true today. Of course, this object does not 
apply to all games: take Pong and Breakout (or 
almost anything with a bouncing ball), or most 
sports games, for example. 

In games for home computers, one has much more 
freedom to design an object that is attainable; the 
game may end. FLW is typical of any of several 
non-arcade games. There is also the adventure game, 
something the arcade manufacturers haven't quite 
figured out how to properly implement in their 
standard format. 

One final element that comes to mind when talk- 
ing about game design is self-consistency. Something is 
self-consistent when all of its parts properly fit in 
with the whole. This is especially important to con- 
sider when one has a strong theme. If I was writing an 
action "Jungle Adventure" game, it would not be 
self-consistent to give the lions and tigers light-sabres 
to use as weapons. Yes, a dash of silliness like that can 
add humor to a game, but it can also ruin any illusion 
of realism (or fantasy) that may have been attempted. 

Try to keep all of these elements in mind when 
mulling over game ideas. The more well thought out 
your submissions to Our Game, the better our game 
will be. 

Debugification. 

One of the most useful skills that frequent pro- 
gramming will give you is the ability to debug (find 
and correct errors) quickly and efficiently. I say use- 
ful because debugging is more than just something to 
do when you program — it is a way to approach prob- 
lems in general. What follows are some hints for effec- 
tive debugging: 

1) Try to write clear code. Use remarks. 
Program in a structured fashion, dividing your 
task into individual procedures. All of this will 
help when you are wading back through a pro- 
gram hunting a bug. 

2) Keep it simple. Do not use optimizing 
(speed-increasing or memory-saving) tricks un- 
less you really need them. Getting the whole 
thing to work comes first, optimizing comes 
later. Also, don't borrow complex routines 
from other programs without careful fore — 
thought (How does it work? How does it affect 
my program?). This, too, will make your pro- 
gram easier to debug. 
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3) Debug in an orderly fashion. Follow a 
general outline for testing a program or routine. 
This one works for me: 

a) Run program or routine. 

b) Write down all percieved errors. 

c) Correct fatal errors (errors that cause 
your program to stop) immediately and re- 
run. 

d) If you make it through the whole thing, 
correct non-fatal errors in the order that you 
spotted them. 

e) Re-run and test after each major error- 
correct. 

f) If necessary, go through the process again 
with different input values. Different para- 
meters may point out new errors. Always try 
out the boundary (highest &. lowest) values 
for inputs. 

4) Beware of sly bugs. Keep in mind that 
one bug-fix may create a different bug. Also, 
two bugs can cancel each other out (just like two 
mistakes in a math problem). Finally, some bugs 
only show up under strange situations. Try to 
cause those situations when debugging. 

5) Help! Don't be afraid to ask someone 
more experienced for help with a bug. Clear 
code (#1) will help her when she looks at your 



HERE COMES THE FUN! 
PLAY 

BEAT 

^^^ THE 

Beatles 



on 



Interactive^^Software 



48K Disk or Cassette $24.95 

Available Now. Order Direct From: 

Interactive Software 

P.O. Box 991 

Bala-Cynwyd, pa 19004 

For All atari Brand Computers 

© 1 983 Interactive Software. (2 1 5) 725-9756 

NOT AFFILIATED WITH ATARI. INC. 



program. Also, don't bias her away from possi- 
ble solutions by immediately listing things you 
have already tried. 

6) Trap the bug. Frequently you can do 
things that will make the source of an error 
clear: 

a) Try different input or parameter values 
and compare the results. 

b) Insert "checkpoint" PRINTs or even 
SOUNDs to let you know when the compu- 
ter has reached a certain part of your program 
(like PRINT "Here at #1"). 

c) Replace extraneous statements with 
"dummy" statements (put a "REM" in front 
of them, (for example) to isolate the cause 
of a bug. 

d) If you need to take a closer look at what 
is happening, slow down a routine by adding 
pause loops (like FOR PAUZ=1 TO 100: 
NEXT PAUZ). 

e) Insert "diagnostic" PRINTs to let you 
know the values of certain variables in a part 
of your program (like PRINT A, J5, 
TNAME$). 

7 ) Watch yourself. If you get confused and 
muddled, re-evaluate what you want to do in 
that part of the program, organize it on paper, 
and re-write it. If things get really bad, don't hit 
the computer — take a break. Also, make sure 
to get plenty of sleep, food and liquids. 

That's all for my debugging hints. If you can think 
of any more, send them along and I'll pass them on to 
the readers. 

We could send letters. 

What? You say you like the idea of Our Game but 
haven't written me a letter yet? For shame, for shame! 

All you have to do is get a piece of paper, write "Dear 
Joel" at the top, and write down the best idea for our 
game that you can think of. Also include anything 
you'd like to say about computer/video games in 
general. Then sign your name and put the piece of 
paper in an envelope. On the outside of the envelope 
it helps to write: 

Our Game 

c/o ANALOG Computing Magazine 

P.O. Box 23 

Worcester, MA 01603 

Then just put a stamp on it and a return address, 
and mail the little bugger! Wasn't that easy? (Don't 
answer that.) 

In next month's Our Game, we will definitely 
start "our game," as well as talk about the ancient 
Sumerian practice of play testing: how to do it, where 
to do it, and who you should do it with. Get excited 
and stay tuned. D 
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16K Cassette or 24K Disk 

PLANETARY 
DEFENSE 



by Charles Bachand and Tom Hudson 
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Think you can defend a planet from enemy space-bombs? This issue's 
assembly-language game will let you find out. Planetary Defense is a 
one-player game that can be played with either a joystick or Koala Tech- 
nologies Corporation's "KoalaPad." 

Something new. 

If you're familiar with ANALOG'S previous assembly-language games, 
you'll notice something new about this one: There's only one BASIC listing! 
Our early efforts included modification listings for cassette and disic 
versions. This new approach allows you to make either version using just one 
program, and reduces the possibility of typing errors. 

Before typing anything, look at the listings accompanying this article. 
Listing 1 is the BASIC data and data checking routine. This listing is used 
to create both cassette and disk versions of Planetary Defense. The data 
statements are listed in hexadecimal (base 16), so the program will fit in 16K 
cassette systems. This makes typing more difficult, but it's a necessary evil. 
Listing 2 is the assembly-language source code for Planetary De- 
fense, created with the OSS MAC/65 assembler. You do not have 
to type this listing to play the game! It is included for those readers 
interested in assembly language. 

Follow the instructions below to make either a cassette or 
disk version of Planetary Defense. 

Cassette instructions. 
1 . Type Listing 1 into your computer using the 
BASIC cartridge, and verify your typing with 
CrCHECK (see page 15). 

(Continued on page 85) 
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ATARI 800XL Call 

Atari 1050 Disk Drive Call 

Atari 1010 Recorder 77.00 

Atari 1027 Printer Call 

Atari 850 Interface Call 

MOSAIC 

64K Ram/400 149.00 

64K Ram + Cable Kit/400/800 169.00 

48K Ram Kit 94.00 

16/32 Expander 64.95 

32K Ram 77.95 

Mosaic Adaptor 49.95 

Memory Expansion for Atari 600XL . . Call 



DISK DRIVES 

Percom 

Irak Call 

Rana For 

Indus Gt . . Prices 



NEW 

RS232 Modem 
Adaptor (Through serial 
port) 39.95 

Koala Touch Tablet 
Cart or Disk... 69.95 



LET YOUR ATARI IMPROVE 
YOUR LIFE AND YOUR MIND 

NEW- THE STIMUTECH SUBLIMINAL PROGRAM 
With the Expando-Vision Interface the Atari 
Computer user can now work on improving his or 
her personal environment during normal television 
viewing with a proven psychological technique 
that was banned by the F.C.C. 
Buy the Expando-Vision Interface for $99 and get 
the Rom Cart of your choice for Free!!! 

Rom Carts are available for: 
W/eight Control Drinking Control 

Study Habits Smoking Control 

Stress Control Career Success 

Sexual Confidence 
Additional Rortn Carts $29.95 each 



MONITORS 

We carry a full 
of AMDEK and 
Monitors. 



line 
USI 



3RD Party Printer Interfaces 

Interfast I 139.00 

Apeface w/cable included 69.95 

PRINTERS 

SUPER SPECIAL - Prowriter Package 

with Apeface or Interfast I Call 

Axiom AT-100 229.00 

Axiom AT-550 329.00 



ATARI 

Programming 2 & 3 - T ... . 23.95 
Conversational Lang, - T . . . 44,95 
Music Composer -Cart ...32,95 
My Firsl Alphabet - D .... 26,96 

Toucti Typing - T 19,95 

Home Filing Mgr. - D 37,95 

Mailing List-T 19,95 

Caverns of Mars - D 28.95 

Computer Chess - Cart . . . 26,95 
Missile Command - Cart . . . 26.95 
Super Breakout - Cart .... 26.95 

Star Raiders - Cart 32,95 

Assembly Editor - Cart .... 46,95 

Basic -Cart 41.95 

Macroassembler - D 67.95 

Pilot (Home Pkg ) - Cart . . . 58 95 
tnvilation to Program IT... 19.95 

Speed Reading - T 55.95 

Basketball - Cart 26.95 

Graph-il-T 15.95 

Juggles House - D/T 22,95 

Pilot (Educator) - Carl .... 97,95 

Video Easel - Cart 26,95 

Defender - Cart 32,95 

Galaxian-Cart 32,95 

Qix-Cart 32,95 

Dig Dug - Cart 32 95 

ET - Cart 37,95 

Timewise - D 23,95 

Atariv^'riter - Cart 74,95 

Donkey Kong - Cart 37,95 

Ms, Pac-Man - Cart 39,96 

Tennis - Cart 35,96 

Eastern Front - Cart 32,95 

Donkey Kong Jr - Cart . . . 39,95 

Pengo - Cart 36,95 

Logo - Cart 79 95 

Robitron - Cart 35,95 

Pole Position - Cart 39.95 

Microsoft Basic II - C 67,95 

Paint - D 33.95 

Caverns of Mars - Cart .... 32 95 

Joust - Cart 39.95 

Visicalc-D 159.95 

THORN 

War Games - Cart 27.95 

Hockey - Cart 27.95 

Soccer - Cart 30,95 

Submarine 

Commander - Cart . . . 30,95 

SIERRA ON-LINE 

Homeword - D Call 

Dark Crystal - D 27,95 

Frogger - D/T 23,95 

Quest For Tires - D .... 23 95 

Ultima I - D 23,95 

Ultima II - D 41,94 

Wizard/Princess - D .... 22,95 



SPINNAKER 

Up For Grabs - Cart 27,95 

Cosmic Life - Cart 23,95 

Pacemaker -Cart/Disk . . . .23,95 

Alphabet Zoo - Cart 23,95 

Fraction Fever -Cart 23,95 

Kids on Keys - Cart 23 95 

Delta Drawing - Cart 27,95 

Story Machine - Disk 23,95 

Rhymes & Riddles - D .... 20,95 

Amazing Things - D 27,95 

Hey Diddle Diddle - D .... 20,95 
SnooperTroopsl or2-D ..30,95 

Trains - D 27,95 

Aerobics - D 30,95 

SIRIUS 

Bandits - D 23,95 

Way Out - D 27 95 

Repton - D 27 95 

Twerps - D 23 95 

Blade of Blackpoole - D . . 27 95 

Type Attack - D 27 95 

Beer Run - D 23,95 

Critical Mass - D 27,95 

Wavy Navy • D 23,95 

GAMESTAR 



Baja Buggies -D/T . . . . 


. 22,96 


Starleague 




Baseball - D/T 


. 2295 


Starbowl Football D/T . . 


. 2295 



SEGA 

Buck Rogers - Cart .... 27,95 

Star Trek- Cart 27,95 

Congo Bongo- Cart .... 27.95 

Tac Scan- Cart 27 95 

EPYX 

Gateway To Apshai- Cart 27,95 

Pitstop - Cart 27,95 

Lunar Outpost - Cart 27,95 

Swat Rescue - Cart 27,95 

Silicon Wartior- Cart ....27,95 
Fun With Music - Cart .... 27,95 

Jumpman Jr, - Cart 27,95 

Dragonriders of Pern - D/C 27,95 
Templeof Apshai- D/C . . . 27 95 
HelKire Wartior -D/C . . . .20,95 
Fun With Art - Cart 27,95 

INFOCOM 

Deadline- D 34,95 

Witness - D 34,95 

Zork Ml. Ill - D 27 95 

Slarcross - D 27.95 

Planetfall - D 34.95 

Suspended- D 34 95 

Enchanter- D 34,95 

Infidel - D 34 95 

Hundreds of items 
available for the ATARI 
. . . please call. 



LJK 

Letter Perfect - D 74.95 

Data Perfect - D 74.95 

Spell Perfect - D 64.95 

BRODERBUND 

AE - D 23.96 

Arcade Machine - D .... 41,95 

Bank St Writer - D 49.95 

Lode Runner - D 23.95 

Drol - D 23.96 

Spare Change - D 23,95 

Choplifter - D 23,95 

DATA SOFT 

Money Wizard - D 49,95 

Letler Wizard - D 49,96 

Spell Wizard- D 34,95 

Genesis - D/T 20,95 

Healhcliff- D/T 20,95 

Pooyan - D/T 20 95 

Zaxxon - D/T 27,95 

Micropainter - D 23,95 

SYNAPSE 

Blue Max - D/T 23,95 

Dimension X - D/T 23,95 

Drelbs - D/T 23,95 

Encounter - D/T 23 95 

Necromancer - D/T .... 23,96 

Ouasimoto - D/T 23,95 

Rainbow Walker- D/T .. . 23,95 

ShamusCase II - D/T . . . 23,95 

Zeppelin - D/T 23,95 

N,Y,C. - D/T 23.96 



FIRST STAR 

Bristles - D/T 20 95 

Flip Flop - D/T 20,95 

Astro Chase- D 20,95 

Boulder Dash - D/T .... 20,95 

STRATEGIC SIMULATIONS 

Carrier Force - D 41 ,95 

Combat Leader - D/T . . . 27.95 
Battle For Normandy 

-D/T 27.95 

Eagles - D/T 27 95 

PARKER BROS. 

Astrochase - Cart 34.95 

Frogger - Cart 34 95 

Q'Bert-Cart 34,95 

Popeye - Cart 34,95 

MISCELLANEOUS 

Castle-Wolfenstein - D . . 20 95 

Home Accountant - D . . . 52,95 

Master Type - D/Cart ... 27,95 

Spelunker - D 27,95 

Flight Simulator II - D . . . 37,95 

Zombies - D/T 23 95 

Mr, Robot - D 23 95 

River Raid -Cart 31,95 

Diskey - D 34,95 



Chatterbee - D 

Rally Speedway - Cart . 

Ultima III - D 

Miner 2049'er- Cart . . 
Scraper Caper - Carl . 



27 95 
34,95 
41,96 
34,96 
34-95 



Co/nyoa t(fkbLLLtu 



TM 



To Order Call Toll Free 



For Technical Info, Order 
Inquiries, or for Wise. Orders ■ 



800-558-0003 414-351-2007 

NO SURCHARGE FOR IVlASTERCARD OR VISA 



COIVIPUTABILITY 

P,0, Box 17882 

Milwaukee, Wl 53217 



fMoatarCofd) 

■■■ .V. J 



ORDER LINES OPEN 
Ivlon-Fri 1 1 AlVI - 7 PM GST 
Sal 12Pryl-5PMCST 



ORDERING INFORMATION For fast delivery send cashier's check, money order or direct bank transfers. 
Personal and company checks allow 2 weeks to clear. Charges for COD are $3.00, School Purchase 
Orderswelcome, In CONTINENTAL USA, include $3.00 shipping per software order. Include 3% shipping 
on all Hardware orders, minimum S3. 00, Mastercard & Visa please include card # and expiration date, Wl 
residents please add 5% sales lax, HI, AK. FPO, APO, Canadian orders- add 5% shipping, minimum $5.00. 
All other foreign orders, please add 15% shipping, minimum $10.00, All goods are new and include factory 
warranty. Due lo our low prices, all sales are final. All defective returns must have a return authorization 
number. Please call 414-351-2007 to obtain an RA# or your return will NOT be accepted for replacement 
or repair. Prices and availability are subject to change without notice. 



Basic XL - Cart 74,95 

Monkey Wrench II - Cart . 49 95 

Omnimon 82 95 

Scraper Caper - Cart . . . 34 95 

BOOKS 

Compute's First 

Bk/Games 12,95 

Inside Atari DOS 19,95 

Mapping the Atari 14,95 

Machine Language/ 

Beginners 14 95 

Your Atari Computer . . . 16.95 

The Atari Assembler .... 12,95 

Visicalc Book-Atari .... 14,95 

ACCESSORIES 

WICO Joystick Call 

Flip 'n' File Trunks 20,95 

Flip'n' File Cart 20,95 

Joysensor 24 95 

Elephanl Disks 

(Box of 10) 20 00 

WICOTrakball 37 95 

KRAFT Joystick 15,95 

D - Disk T - Casaetle 

Cart - Cartridge 
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2. Type RUN and press RETURN. The pro- 
gram will prompt you with: 

MftKE CftSSETTE C8> , OR DISK flJ? 

Type and press return. The program will now 
begin checking the DATA statements, printing 
the line number of each as it goes. It will alert 
you if it finds any problems. Fix any incorrect 
lines and re-RUN the program if necessary until 
all errors are eliminated. 

3. When all DATA lines are correct, the 
computer will beep twice and prompt you to 
READY CASSETTE AND PRESS RETURN. 
Insert a blank cassette in your recorder, press 
the RECORD and PLAY buttons simultane- 
ously and hit RETURN. The message 
WRITING FILE will appear, and the program 
will create a machine-language boot tape 
version of Planetary Defense, printing each 
DATA line number as it goes. When the 
READY prompt appears, the game is recorded 
and ready to play. CSAVE the BASIC program 
onto a separate tape before continuing. 

4. To play the game, rewind the tape created 
by the BASIC program to the beginning. Turn 
your computer OFF and remove all cartridges. 
Press the PLAY button on your recorder and 
turn ON your computer while holding down 
the START key. If you have a 600 or 800 XL 
computer, you must hold down the START 
and OPTION keys together when you turn on 
the power. The computer will "beep" once. Hit 
the RETURN key and Planetary Defense will 
load and run automatically. 

Disk instructions. 

1. Type Listing 1 into your computer using 
the BASIC cartridge, and verify your typing 
with D:CHECK2 (see page 15). 

2. Type RUN and press RETURN. The 
program will ask: 

HftKE Cft55ETTE (0J , OR DISK CIJ' 

Type 1 and press RETURN. The program will 
begin checking the DATA lines, printing the 
line number of each statement as it goes. It will 
alert you if it finds any problems. Fix incorrect 
lines and re-RUN the program if necessary until 
all errors are eliminated. 

3. When all DATA lines are correct, you will 
be prompted to INSERT DISK WITH DOS, 
PRESS RETURN. Put a disk containing DOS 
2.0S into drive #1 and press RETURN. The 
message WRITING FILE will appear and the 
program will create an AUTORUN.SYS file on 
the disk, displaying each DATA line number as 
it goes. When the READY prompt appears, the 
game is ready to play. Be sure the BASIC 
program is SAVEd before continuing. 



4. To play the game, insert the disk contain- 
ing the AUTORUN.SYS file into drive #L 
Turn your computer OFF, remove all cartridges 
and turn the computer back ON. Planetary 
Defense will load and run automatically. 

Playing the game. 

Once started. Planetary Defense will display the 
title screen and controller options. 

To use a joystick, plug it into controller jack #1 
and press either START or the joystick button to 
begin the game. 

To use the KoalaPad, plug it into controller jack 
#1 and press either SELECT or one of the KoalaPad 
buttons to begin the game. 

You are in charge of protecting your planet from 
alien attackers. Your only defense is an orbiting 
satellite armed with a charged-particle gun. To aim 
the gun, you simply move the targeting crosshairs to 
the desired point with the controller. Press your 
controller button to fire at the target. Once fired, 
you have no control over the charged-particle 
projectile. Up to six projectiles may be active at a 
time. Be careful about where you shoot — if you're 
not careful, you can hit your own planet and destroy 
part of it! 
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Your usual target will be the red space-bombs 
being dropped by the aliens. These bombs head 
toward the center of your planet. If they hit the 
planet they will explode, destroying a chunk of it. If 
any explosion ever reaches the core of the planet, the 
game is over. If you destroy a space-bomb before it 
hits your planet, you are awarded from 10-120 
points, depending on the level. 

Another threat that is much more dangerous than 
the space-bombs is a flying saucer that cruises along, 
firing its own charged-particle weapons at your 
planet! If not stopped quickly, this alien menace will 
do an incredible amount of damage. The saucer 
appears more often at higher levels, so be on the 
lookout! Saucers are worth from 100-400 points 
each, depending on the level. 
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If your satellite ever collides with an incoming 
space-bomb, the satellite will be destroyed. If the 
collision is a direct hit, the bomb will also explode, 
giving you the appropriate amount of points. This is 
a costly way to gain points, as you have only five 
satellites. Once all five are destroyed, the game is 
over, and your planet will be overrun by enemy 
bombs. 

Your score is shown at the upper left of the screen. 
The number of the level you are on is shown at the 
upper center of the screen. The number of satellites 
you have is shown at the upper right by the "*" 
characters. The space bar pauses the game. Good 
luck! D 



BASIC Listing. 

le REM ««» PLANETARY DEFENSE lam 

28 TRAP 28:? "HAKE CASSETTE C81 , OR DI 

SK C13";:INPUT l>SK:IF 0SK>1 THEN 28 

38 TRAP 48888:DATA 8.1,2.3,4.5,6,7,8,9 

,8.8,8.8.8.8.8.18,11,12.13,14,15 

48 DIH DATS C91], HEM C22]: FOR M=8 TO 22: 

READ N : HEX (K)=N: NEXT X:LINE=998:REST0R 

E 1888: TRAP 128:? "CHECKING DATA" 

58 LINE=LINE+18:? "LINE:"; LINE: READ DA 

T$:IF LENCDAT$]<>98 THEN 228 

ee DATLIN=PEEKC183l+PEEKC184]»25e:IF D 

ATLINOLINE then ? "LINE ";LINE;" HISS 

ING!":END 

78 FOR X=l T8 89 STEP 2 :D1=ASCCDAT$CX, 

Hi ) -48 : D2=ASC CDAT$ CX«1, Ml^l) 1 -48 : BVTE=H 

EHCDl)«ie+HEXCD2J 

88 IF PASS=2 THEN PUT ltl,BYTE:NEXT X:R 

EAD CHKSUH:GOTO 58 

98 TOTAL=TOTAL+BYTE:IF T0TAL>999 THEN 

T0TAL=T0TAL-1888 

188 NEXT X:READ CHKSUN:IF T0TAL=CHKSUH 

THEN 58 
118 GOTO 228 

128 IF PEEKC195)<>6 THEN 228 
138 IF PASS=8 THEN 178 
148 IF Nei DSK THEN 168 
158 PUT ttl,224:PUT tll,2:PUT ttl,225:PUT 

ttJL,2:PUT ltl.l8:PUT t»l,33:CL0SE ttl:END 
168 FOR H=l TO 34: PUT ltl.8:NEXT X:CLOS 
E ttl : END 

178 IF N8T DSK THEN 288 
188 ? "INSERT DISK WITH DOS. PRESS RET 
URN";:DIH IN$C1):INPUT IN$:OPEN IM.8.8 
,"D:AUTORUN.SYS" 
198 PUT ttl,255:PUT ttl,255:PUT t»l,8:PUT 

ttl.32:PUT ttl,181:PUT ltl.45:G0T0 218 
288 ? "READY CASSETTE AND PRESS RETURN 
";:OPEN ttl.8.128."C:":REST0RE 238:F8R 
X=l TO 48: READ N:PUT ttl. N: NEXT X 
218 ? :? "HRITING FILE":PASS=2:LINE=99 
8: RESTORE 1888: TRAP 128: GOTO 58 
228 ? "BAD DATA: LINE "; LINE: END 
il^J^lt ? ' 28 . 216 , 31 , 255 . 31 . 169 . 8 . 141 , 
f?4*ji*?i"'"*'*'211.169,8,141,231.2' 
133,14,169,56,141,232.2 

li**?*I5 "3,15. 169, 18, 133, 18. 169, 33,1 
*», 11, Z4, 96 

422f - gfiIS_787878787878787878461C287887 

788618867878862886488641882888212E212C 

2F2788232F2D383534292E27, 488 

1818 DATA 87338848786C616E657461727948 

iSSf555*®5*E'^3*54e88A2B988A3A8AlB2ACA5 

B388A2A1 A3A8A1 AEA488C8C8 , 82 

iS?2..55I5-52l^'^"*C8F4EFEDCeE8F5E4F3EF 

EEC8C8C8486B6F616C6148786164484D487365 

6C65637448C8EAEFF9F3F4E9, 578 

1838 DATA E3EBG8CDCDCDC8F3F4E1F2F4C888 

S2iE5??25f '225333388343229272725328888 

787846452E4D88388D8D8D8D, 161 

1848 DATA 8D8D8D8D8D8D8D8D8D8D8D8D8D8D 

8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D 

8D8D8D8D8D8D8D8D8D8D8D8D , 586 



1858 DATA 8D8D8D8D8D8D8D8D8D8D8D8D8D8D 

8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D 

8D8D8D8D8D8D8D8D8D8D8D8D ,851 

1868 DATA 8D41A828D8A9888D8ED4A27F9588 

CAD8FBE6BBA9FF859C85A985B98SBA28EA298D 

87D2A9C48DC402A9848DC582 , 315 

1878 DATA A98A8DC682A9988DC782A9588De8 

82A9238D8182A9C88D8ED4A9328D88D48D2F82 

A9ee8DlDD88D88D2A2849DeD, 978 

1888 DATA D8CA18FA2865E4A9888D38e2A928 

8D3182A223A876A987285CE4A93C858CA58CD8 

FC AD7C824D7D82D818AD8482 , 64 

1898 DATA F88BAD1FD82983C983F8EA298185 

B8A98A858CA58CD8FCAD1FD8C987D8F1A93885 

81 A9888588A2eFA89188C8D8 , 21 

1188 DATA FBE681CA18F6A2889D88839D8884 

9D88859D88869D8887CAD8EEA9A88D3882A928 

8D3182A9888D87D4A93E8D2F , 584 

1118 DATA 828D88D4A9838D1DD8A9118D6F82 

A98885BBA98F85828584A93785838585A288A8 

88BD5F22D8834C9522388991 , 324 

1128 DATA 829184C8E84C11228A85878A8AA9 

55B882A98848BD5F22298F85866891829184C8 

C686D8F7E8A58718CB38A582 , 647 

1138 DATA E9288582B882C68318A584692885 

8498BSE6854C8F22EAEAEAEAEA15A854C115A8 

54C185A858C185A858C181A8, 397 

1148 DATA 48C181E88115A654C18185A658C1 

8181A648C182E68285A458C183E484E288A248 

A88818A9687D8F2399481F9D , 638 

1158 DATA 881FA9587DCE229D881E99481E38 

A958FDCE229D881E99C81EA968FD8F239D881F 

99C81FC8CA18CE4C34258881 , 255 

1168 DATA 82828384858586878889898A8B8C 

8C8D8E8E8F1818111212131414151516171718 

1819191A1A1B1B1B1C1C1D1D , 15 

1178 DATA 1D1E1E1E1E1F1F1F1F1F28282828 

28282828363636363636363635353534343433 

3332323131382F2F2E2D2C2C , 943 

1188 DATA 2B2A292827262625242321281F1E 

1D1C1B1A18171615141211188F8D8C8B898887 

e584e38188488A48E6AAA5AA , 834 

1198 DATA 2987AABD6E2385B18D8AD48D16D8 

A98C8D17D868AA68488882848688868482D8A6 

ABBD8F2C8DC382A98585AAA9 , 378 

1288 DATA C88D8ED4ADFC82C921D88BA5B249 

FF85B2A9FF8DFC82A5B2F88DA988A2879D88D2 

CA18FA4C62E4A5BBD889ADC6, 721 

1218 DATA 821869188DC682A5B8F88C4A4A8D 

87D2A9288D86D2C6B8A5A918834C3324A491A2 

85A98F39FD8299FD82C8CA18, 578 

1228 DATA F4AD7882A698A4914AB88288884A 

B882C8C84AB881CA4AB881E8E8389886E8D8B8 

828698C8289e86C8E8B88284 , 258 

1238 DATA 91A5B8F8832e7B2BA5BCD81CA285 

A491BD892C19FD8299FD82C8CA18F3A698CA8E 

87D8E8E88E86D8A5AEF882C6, 437 

1248 DATA AEA58CF882C68CA58DFe82C68DA5 

8EF882C68EA5A918834C62E4A5A5Fe3AE689A4 

8918B9881E8596692F8D85D8, 351 

1258 DATA 69828D84D8B9881F4A85972A6924 

AAE68FA58F2988A8A9888588BD888329F81924 

259D8883CAC8C688D8EFA5AB, 332 

1268 DATA F838ACF42D8888A289C828988AC8 

DFB886BD912C99888788CA18EEADE82D8D83D8 

E6ACA5AC4A2983AABD9B2C8D . 987 

1278 DATA 952C8D962CA6BA1887A9888D81D2 

Fe8DA9A68D81D2BD752D8D88D2C6BAA6B91887 

A9888D83D2F88DA9A68D83D2. 276 

1288 DATA BD832D8De2D2CeB9A5ABFeeBADF4 

2DC9249884C9E79887A9888D85D2F817E6B7A6 

B7E88C3884A28886B7A9A88D . 189 

1298 DATA 85D2BD912D8D84D24C62E4888888 

8A848A8888888888848A848888A988859D859E 

859F858C85B285BD85AB859B. 122 

1388 DATA A28B9DD92DCA18FAA213BD8D2D9D 

452ECA18F7A981859A85A5A984859CA98C8DCe 

82A9348DC8828DC1828DC282 . 315 

1318 DATA A97F8598A9818591A98185A92848 

2BA9548D9337A9158D94378D1ED8285E2BA69B 

BD212D85C6BD2D2D85C7BD39. 537 

1328 DATA 2085ADBD452DC9FFD885AD8AD229 

F885B1BD5D2D85A6BD512D85A7BD692D8SA8E8 

8BF882E69BF8A59A18698185 , 417 

1338 DATA 9AD8A5B2D8FCA988854DA5A918e7 

A5BDD8834CD229AD93372983C983F889AD9437 

29C8C9C8D88FA98885C685A5 . 113 



ISSUE 17 



ANALOG COMPUTING 



PAGE 87 



1340 DATA A9FF859C85A920EA29AD1FD8C987 

F8e34C12212e4327A5A5Fei8AD8482C599F8e9 

8599C9e8l>0e32e65282eAE28 , 172 

1358 DATA A58DD81728882928F6292876262e 

1B29A5ABF883282328A981858DA5C6D889A5A9 

3e85ADD92D8DDA2D8DDB2D8D< 871 

1368 DATA DC2DF8e34CCF254C8F25A94e85B8 

E6BDA4BDA5BE999D2DA5BF99B12DA98899C52D 

68A98e85ClE6Cl ASBDC5C138 , 88 

1378 DATA F3A6ClA9888SCeBDCS2DC925382E 

E6Ce38E925C92538258AA8E8E4BDFe821815BD 

9D2D999D2DBDB12D99B12DBD, 973 

1388 DATA C52D99C52DC8DeE4C6BDC6C14C7A 

26FEC52DA8BD9D2D1879C32C85C2C9A8B8ACBD 

B12D79E82C8SC3C96eB8A828 , 536 

1398 DATA F326A5C8D88ABDAF2C118A918A4C 

7A2eBDB32C318A4CE626ASC38A858AA98e858B 

868A268B868AA58A85C5268B, 774 

1488 DATA A58B85C4868A268B868A268BA58A 

1865C5858AA58B65C4858BA988186S8A858AA9 

38658B858BA5C22983AAA5C2 , 182 

1418 DATA 4A4A18658A858A9882E68BA88868 

A5AED884A5C6D88168A283BDD92DF8e4CA18F8 

60A9819DD92DC6C6A9889D15,688 

1428 DATA 2E9D212EA5A93853E883D84FAD8A 

D2CSADB848A98185ABAD8AD22983A8B99F2CC9 

FFDe852ei928692385929DE5 , 918 

1438 DATA 2DB9A32CC9FFD885281928e93785 

939DF12DB9A72CC9FFD8e5A9E638E5938594B9 

AB2CC9FFD882A59285954C81 , 917 

1448 DATA 28AD8AD23819AD8AD22981A8B9e7 

2C9DF12DAD8AD2C9FAB8F99DE52D4CF127AD8A 

D22981A8B9672C9DE52DAD8A , 486 

1458 DATA D2C9FABeF99DF12DBDE52D8592BD 

F12D8593A9888594859528EE2AA5CA9D2D2EA5 

CB9D392EA5C89DFD2DA5C99D.198 

1468 DATA 892Ee8AD8AD2297FC964B8F768AD 

6AD2C986B8eDA287B0DD2DF887CABDDD2DF881 

68A9388595A9588594ADE82D , 855 

1478 DATA 38E92C85929DE92DC9A8B8E8ADF4 

2DE9254A85939DF52DC95FB8D9A98D85B94C91 

28A285BDDD2DFe84CA18F868.82 

1488 DATA A98D85BAA59685929DE92DA59785 

939DF52DA59838E93e8594A59138E9284A8595 

28EE2AA5C89D812EA5C99D8D , 986 

1498 DATA 2EA5CA9D312EA5CB9D3D2EA9819D 

DD2D68A58ED8FBA59C1884A981De82A5C7858E 

A2e3BDD92DF852288F2AA59C, 574 

1588 DATA 1889288F2A288F2A288F2ABDF12D 

1869828582A988858A8A8984858B8684E883D8 

04A5ABDe27BC2D2EA9118587 , 3 

1518 DATA BE852CA482C8289889C8DFBe85BD 

692C918A88CACe87D8EDA684BDE52D9D8eD8CA 

18A668A28BBDD92DF858BDE5, 358 

1528 DATA 2D85C2BDF12D85C3869828F326B1 

8A3DB32C918AA698288F2ABDE52DC9A8B82285 

C2BDF12DC968B81985C328F3 , 478 

1538 DATA 26BDAF2C318AF815Ae98A5G285BE 

A5C385BF285E26A98e9DD92D4C7A29BDAF2CA6 

983DB72C118A918ACAE883D8, 136 

1548 DATA 9E68A58CF88160A59C30FBA98185 

A5AD88D88D89D8F8EFA98885A58589A69C9D53 

2EC69C1889A9FF85C68S A928 , 31 

1558 DATA EA29A59685BEA59785BF285E26A9 

588596A9158597A288BD888329F89D8883CAD8 

F5A9FF858C6020EA29AD8482, 611 

1568 DATA 2D7C822D7D82F887ADlFDeC987F8 

EE4C1221A9888D81D28D83D28D85D268A283A5 

ABF01EA90085AFA5A9384DAD , 633 

1578 DATA E82DC9279O46C9D3B042ADF42DC9 

13903BC9E7B037A9ee85AFBD84D82985F863E6 

AF29e4Fe26A5A93022A9e285, 277 

1588 DATA AEE883D88BA5ABF887A5A885A14C 

4A2AA5A685A2A5A785A1869828362BA698A988 

9DD92DBC2D2EBDE52D38F987 , 54 

1598 DATA 2C85BEBDF12D38E9284A85BFASAB 

F0eFE883D88BA98885AB28DA2AA5A9388A28DA 

2AA5AFF8832e5E26CA188F8D, 358 

1688 DATA 1ED868BD152E187DFD2D9D152EA9 

882A85CCBD212E7D892E9D212EA9002A85CDBD 

2D2EF888BDE52D65GC4CBF2A , 5 

1618 DATA BDE52D38E5CC9DE52DBD392EF889 

BDF12D38E5CD4CD62ABDF12D1865CD9DF12D68 

A9e89D8eD8A88A8984858B98.847 

1628 DATA 858A918A88DeFB60A98e85CAA592 

C5949885E5944C842BE6CAA59438E59285C8A9 

0185CBA593C5959e85E5954C . 177 



1630 DATA lC2BC6CBA59538E59385C9e5C8D8 

04A98885C8A5C8300BA5C93O0706C886C94C26 

2B60A000F818A282B59D75A8 , 498 

1640 DATA 959D94A0CA10F5D8A91885A4A281 

Ae00B99D0020662BE8E8C8C883D8F368Ae5884 

A4A59AA28B85A3298F85A49D . 227 

1650 DATA 462EA5A34A4A4A4A05A49D452E68 

A284B5CD95CEB5D29SD3CAD0F5A491A205B988 

8329F8998883CA18F5A98185, 684 

1660 DATA BCAD700285CEC9859852AD718285 

D3C9859849A9CE85B5A98885B62eF72BB83C69 

18C938B882A938C9D89882A9 , 285 

1678 DATA CF8598A9D385B5A98885Be28F72B 

B81F6910C920B002A920C9EO9002A9DF8591AD 

7C824D7D8249818D8482A988 , 391 

1680 DATA 85BC6eA988A28495DDCA18FB85B3 

85B4A8A281BlB599D888C8285A2CBlB58A3eDD 

71BS9002F6DD0A36DD95D8E8 M63 

1690 DATA C820SA2CBlB599D88eA284B5D865 

B385B3B5DD65B485B4CA18F1A284A5B346B46A 

CAD8FAAAA00438F1B5B88449, 757 

1780 DATA FF6901C918B0048A8818EF68B1B5 

8A36DD8A36DD95D8E8C86880FA000000088888 

DC3E7E3EDC8888888888887e , 27 

1718 DATA F8FCF8768888888888881B182F2A 

4848A8A8484834F88888187E88887E18ee8892 

49249228FFD2FFFF14FFE6FF , 377 

1728 DATA D2FF2814FFE6FFC8388Ce33FCFF3 

FC8088888OFFFFFFFFFFFFAAAA0001FF88FF81 

8882FFFE888188FE828ieiFF , 69 

1738 DATA 8882FEFF83e8FDFE8382FFFEeiFF 

83FD81FD82808881FF88818188FF8182FFFEFF 

8ie2FE8283FF8eFE81FD88FE, 931 

1748 DATA FF828382FDFD000103FFFE8888e8 

ee888e8ee06C766C888888CACACACACA8eeA8F 

141914198F141914191E8C8B , 829 

1758 DATA 8A898887878685858483888A325A 

3250283C645e787D28384858687888A8B8C8D8 

FF8888888888888888888181 . 251 

1768 DATA 8118283848586878889888182888 

8181818282838383848484F4FED2DCB8BA8E98 

eC764A542832656855584540 , 601 

1778 DATA 35382528151885888A8B8C0E1811 

1211100E8C8B808O0e888880888888ee8e8eee 

888088888000000000000000, 981 



CHECKSUM DATA 
(see p. 15) 

10 DATA 66,351,496.811,423,729.288,683 

,555,573,694,613,29,285,957,7385 

168 DATA 748,198,962,626,491,38,155,11 

4,488,59,873,219,658,823,822,7186 

1060 DATA 217,905,57,111,816,713,717,9 

24,566,982,425,338,378,877,257,8275 

1210 DATA 986,698,117,994,961,216,869, 

75,578,126,47,288,842,795,861,8365 

1368 DATA 413,286,583,133,992,885,976, 

63,382,513,171,449,151,136,685,6578 

1518 DATA 215,972,203,79,973,897,29,35 

8,93,25,458,913,865,962,895,7929 

1668 DATA 841,889,985,932,939,702,412, 

8,684,35,192,678,7137 



Assembly language listing 



PLANET 1.M63 
.OPT ND LIST 



ANALDQ Conputlna's 
PLANETARY DEFeSsE 



by Charlvs Bachand 
and Tom Hudson 



Written nlth OSS nAC/69 
Hardwara Ragistara 



Great Software • Great Service •JSreotPrices 




from Atari 



Pole 
Position 



ROM Cart. $36.88 

Not since the release of their Pacman car- 
tridge has there been such great anticipation 
for a game program from Atari. Expectations 
increased though months of pre-advertising 
without product delivery. Well, Pole Position is 
out now and it's well worth the wait. It's an ex- 
citing rendition of the coin-op game that was 
one of the two most popular (the other is 
Q*Bert)of1983. 

All Atari programs including l;^s. Pacman, Dig 
Dug, Oix and Donkey Kong in stoci< and 
available at similar savings. 

from Broderbund 





Lode 
Runner 

48K Disk $22.88 



Runner-up (to Miner 2049er) as the outstan- 
ding original arcade game of 1983 in our in- 
house poll. 150 thrill-pacl<ed levels plus a 
game generator feature which permits you to 
design and play your own levels. If you're star- 
ting to "burn out" on arcade games, this pro- 
gram will rekindle your enthusiasm. 
All Broderbund Software including The Ar- 
cade f^lachine. Operation Whirlwind and 
David's Ivtidnight Magic in stock and available 
at similar savings. 



from Electronic Arts 



PlnbGlJ 

Construction 

Set 

48K Disk $27.88 



Steve Wozniak of Apple Computer Corp. has 
called Bill Budge's Pinball Construction Set 
"the best program ever written for an 8-bit 
computer." You can build your own pinball 
machine from the parts provided — bumpers, 
flippers, targets, etc. — and, then, save and 
play them. You can also control the machine's 
logic, affecting the scoring, the sound, or even 
the amount of gravity inside the machine! 
All Electronic Arts programs including Ar- 
chon, M.U.L.E. and Murder on the Zinderneuf 
in stock and available at similar savings. 

from Synapse 

Blue 

IVlGX 

32K Tape or Disk $22.88 

The premier Atari software house brings you 
still another fabulous program. As a member 
of the Royal Air Force, you will command a 
biplane fighter/bomber and will battle the Axis 
on the ground and in the skies. Excellent 
scrolling and 3-D graphics. 
Ail Synapse programs including Rainbow 
Walker, Encounter and Pharoah's Curse in 
stock and available at similar savings. 







from Paricer Brothers 

r>i Q*Bert 

ROM Cart. $33.88 

It's everybody's favorite arcade character of 
1983. it's lovable Q'Bert. This is the official 
Atari cartridge version of the smash coin-op 
hit. Excellent graphics and game play. 
All Parker Brothers programs including 
Popeye, Super Cobra, Frogger and Astro 
Chase in slock and available at similar 
savings. 

from Microprose 

Solo 
Fligtit 

48K Tape or Disk $22.88 

The first real flight simulator for the Atari. 
Features include: color, three-dimensional 
graphics; dual radio navigation instruments; 
full-feature, actual configuration instrument 
panel; multiple air navigation charts; multiple 
airports and runways; day, night, cross-wind 
and instrument Hying scenarios; takeoffs and 
landings; emergency procedure practice; and 
(as they say) much, much more. An outstan- 
ding program that realistically simulates the 
thrill and challenge of flying. 
All Microprose Software including NATO Com- 
mander, Hellcat Ace and Floyd of the Jungle 
in stock and available at similar savings. 




NEW RELEASES 




Save Big on a Dozen Recent Releases! 1 


Bank St. Writer (Broderbund) D 


$44.88 


Eagles (SSI) D 


$27.88 


Enchanter (Infocom) D 


$34.88 


Infidel (Infidel) D 


$34.88 


LOGO (Atari) R 


$74.88 


Oil's Well (Sierra On-Line)R 


$23.88 


Pitstop(Epyx)R 


$27.88 


Planetfall (Infocom) D 


$34.88 


Spellunker (Micrographic) D 


$27.88 


Trains (Spinnaker) D 


$27.88 


Ultima III (Origin) 


$39.88 


Zaxxon (Datasoft) T&D 


$24.88 



SUPERSPECIALS 




Save 33% to 43% on these Classic Programs! 1 


Baja Buggies (Gamester) T&D 


$19.88 


Bandits (Sirius)D 


$19.88 


Castle Wolfenstein (Muse) D 


$18.88 


Choplifter (Broderbund) D 


$22.88 


Crush, Crumble & Chomp (Epyx) T&D 


$18.88 


Pacemaker (Spinnaker) D 


$22.88 


Jumbo Jet Pilot (Thorn-EMI) R 


$29.88 


Labyrinth (Broderbund) T&D 


$18.88 


Mastertype (Lightning) D 


$24.88 


Serpentine (Broderbund) T&D 


$19.88 


Soccer (Thorn-EMI) R 


$29.88 


Visicalc (Visicorp) D 


$139.88 



Call or write for FREE CATALOG (specify Atari) 



Mall order prices do not apply 
at our retail location.. 
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iifoinidtiuii 



iu.^u. ^} i I -t . 



HPOSPB 


*DI00 


HPosne 


*Dea4 


PBPF 


»D9e4 


MBPL 


*D>e8 


QRBFPB 


»D00D 


COLPPe 


»Dei6 


6RflCTL 


«D01D 


HITCLR 


»D»1E 


CQNBOL 


• DBIF 


AUDFl 


• D2«e 


flUDCl 


• *D201 


flUDCTL 


»D2B8 


RANDOM 


• DZBA 


DMflCTL 


• D40e 


PMBnSE 


»D4e7 


MSYNC 


• D40A 


NMIEN 


»D40E 


ftTRflCT 


*4D 



Ipe hor 
|M» hor 
|P»-PFi 

jne-PLa 

iPn gra 
|PF col 
) graphi 
I cl ear 
I conaol 
(f raqu* 
I vol una 
I audio 
I random 
IDHA CO 
tPn bam 
iMalt h 
I intarr 
I attrac 



1 zontal 
Ixontal 
eld coll, 
yar coll. 
phlca 
or 

c control 
hit rsg 
a buttons 
ncy 1 

1 
control 

nunbera 
ntr Dl 
a addraafi 
or. sync 
upt reo. 

t -flag 



) Oparatlng 


Symtam 


Vactori 


aETVBV 


. 


• E4SC 


last V. blank 


XITVBV 


■ 


•E462 


Jaxlt V. blank 


SIQINV 

1 


" 


• E46a 


laarlal I/O inlt 


1 ShadoM 


R«glmt«rs 




1 
VD9L3T 




*«20e 


IDLI vactor 


SDnCTL 




•022F 


1 DnA control 


SDLSTL 




*a230 


(DLtat polntar 
Sgr. priority 
Ipaddla 


BPRIDR 




««26F 


PADDL0 




*0270 


PADDUl 




»>271 


Ipaddla 1 


STICKS 




»»278 


IjoyBtick 


PTRiee 




*027C 


Ipaddla trig 


PTRIBl 




»027D 


Ipaddla trig 1 


STRIS* 




• 0284 


latlck trig 
Iplayar colorB 


PCOLR0 




•02C0 


COLOR0 




*02C4 


Iplayfiald " 
Ikayboard char 


CH 

1 




»e2FC 


1 Pag* Z 


■ ra 


R«gl«tars 



from 



to Y 



*» «B0 I top of paga 

INDEX •- •+2 Itaap Indax 

INDXl •- •+2 Itanp indax 

INDX2 •- *f2 Itaap index 

COUNT ** a-t-1 Itaap raglatar 

TEMP ♦« a+l Itaap raglatar 

SATEMP •- •+! Itaap raglatar 

SCNT »- »+l lorbJt Indax 

LQ *- **! Iplot low byta 

HI •- ♦+! Iplot high byta 

DEADTM •- »+l Idaath tlaar 

EXPTIM »" •+! laxploalon timar 

BOMTin •- 1*1 ibonb tlaar 

BATPIX »" »♦! laat. pic cntr 

CURX •" •+! icuraor • 

CURY ♦- »+l I cursor 

FROnx «• s-H ivactor 

FRQMY •" •+1 ivactor froa 

TOX »" »+l ivactor to X 

TOY »- •+! ivactor 

SATX •- »+l laatallita 

3ATY •- »+l laatallita 

XHOLD •■ •+! IX rag hold araa 

LflSTRB •- »+l I laat triggar 

LEVEL *- a+l llaval numbar 

BLEVEL »- ♦+1 Iblnary laval • 

LIVES •- ♦+! lllvaa laft 

SCORE »- •♦3 lacora dlgita 

SCOADD »- »+3 lacora inc. 

8HDBYT •" •♦! Idlglt hold 

SHCOLR »- »+! Idlglt color 

8ATLIV •- •+! imatalllta flag 

BDMVL •- »+l Iboab value Ioh 

BOMVH •- •'•'1 Iboab valua high 

SAUVAL *" »+l laaucar value 

SAMCTL »" »+l Igaaa Ctrl flag 

DLICNT •■ »-H iDLI counter 

SAUCER •- **l laaucar flag 

SAUTIM •- •♦! liaage timer 

SAUCHN •- *-H laaucer chance 

BOMBMT *- a+l Iboab Halt time 

BQMCOL *- 0+1 Iboab collla fig 

DEVICE *- a-fl ikoala pad an 

PLNCOL •■ •+! Iplanat color 

PAUSED *• **! ipauaa flag 

AVQ •• ♦+2 leverage 

PTR •« • + 2 I queue pointer 

SsaCNT »" »+l I saucer and cnt 

EX3CNT •- a-fl laxpl. and count 

ES8CNT >- *+l I enemy shot and 

PBSCNT •- •+! Iplayar shot and 

TITLE •- ♦♦l Ititla acrn flag 

PENFLB •• sfi Ipen up/dwn fig 



EXPCNT 

NEHX 

NEWY 

PLOTCLR 

COUNTR 

PLQTX 

PLOTY 

HIHLD 

LDHLD 

BOMBS 

BOMTI 

VXINC 

VYING 

LR 

UD 

DELTAX 

DELTAY 

xa 

VQ 
8L 
3H 



»+i 
»*1 
»+l 

• +1 

• +1 

• •H 
s+l 
»-H 

• + 1 

• •H 

• +1 

• +1 
»+l 

• •n 
•fl 

• +3 

• + S 

«+s 

• + 5 



lex 
lex 
Ipl 
lex 
Ipl 
Ipl 
Ipl 

Ibo 
Ibo 
1 v< 

I VI 

I v< 
I ve 
IV 
I ve 
IX 

Ua 
I 



plosion counter 
ploBlon X 
plosion y 
ot/erase flag 
plosion indax 
ot X coord 



ot 



coord 



ot Mork area 

ot Hork araa 

mba to cone 

mb Speeds 

ctor X hold 

ctor y hold 

ctor left/right hold 

ctor up/doMn hold 

ctor Mork area 

ctor work area 

queue 

queue 

fflplea lo 

fflplea hi 



■BYTE *8D,«8D,»aD,«8D 
.BYTE SBDlaBD.aSD.aaD 
■BYTE •8D.*aD,»BD,*S0 
■BYTE SSD.aSD.SSD. SBD 
■BYTE •8D;»8D,»8D,»BD 
■BYTE *aD, »BD,*8D,*aD 
■BYTE »8D!»aD,»BD,»41 
■MORD QLIST 



Dlaplay the Intro Screen 



Screen + PI ayer /Mlsat la Araa 



8CRN 

PROS 

I 

P(1 

NI8L 

PLR0 

PLRl 

PLR2 

PLR3 

I 

ORBX 

ORBY 



• 3000 I screen area 
SCRN-M^sa Iplanat poa 

• 00 

PHftezee imlaallea 
MISL'»«0100 Iplayar 
PLne^ttmt l player I 
PLR1+»0100 Iplayar 2 
PLR2'>^*0100 Iplayar 3 

•1E00 lorblt X 
•1F00 lorblt Y 



Start of gaae 



•- •2000 



Intro Display List 



.BYTE •70,»70,^7e,^70 
.BYTE »70,^7a,«70.»70 
■ BYTE »70,»4<i 
.HORD MAGAsB 
.BYTE »70,7,»70,6 
.BYTE •10, A, •70, •70 
.BYTE &,^20,6,^40 
.BYTE 6:^41 
.HORD TLDL 



Intro Message Text 



.8BYTE " ANALOB CO" 
.8BYTE "MPUTINa"3 - 
.SBYTE •I-S40, " PLANETARY" 
.SBYTE +•40," DEFENSE " 
.BBYTE +•80," BY CHARLE" 
.SBYTE +•80, "B BACHAND " 
.SBYTE +»C0," AND TOM" 
.SBYTE +^C0," HUDSON 
.SBYTE +»40,- KOALA PAD" 
. SBYTE +»40," - SELECT " 
.SBYTE +»C0," JOYSTICK " 

.SBYTE +»C0," START " 

.SBYTE " OR PRESS" 
.SBYTE " TRIBQER 



Same Display Liat 



ST 


■ BYTE 


• 70, 


• 70 


• 46 






■ MORD 


BCoLlN 








■ BYTE 


• 4D 










■ HORD 


SCRN 








.BYTE 


• BD 


•an 


• BD 


•nn 




.BYTE 


• SO 


• 8D 


• 8D 


• SD 




.BYTE 


• 8D 


• HD 


• BD 


• RD 




.BYTE 


• 8D 


• 8D 


• SD 


•RD 




■ BYTE 


•8D 


• BD 


•SD 


• BD 




■ BYTE 


•8D 


• SD 


• SD 


• SD 




■ BYTE 


• SD 


• SD 


•SD 


• BD 




■ BYTE 


• RD 


• RD 


• SD 


• SD 




.BYTE 


• SD 


• Rn 


• SD 


• SD 




.BYTE 


• SD 


• 8D 


• SD 


• SD 




.BYTE 


•an 


• BD 


• BD 


• SD 




.BYTE 


•8D 


• SU 


• BD 


• BD 




.BYTE 


•BD 


• 8l> 


♦ BD 






.BYTE 


• SD 


• 81) 


• BD 


• 80 




■ BYTE 


• RD 


• pn 


• SD 


• BD 




.BYTE 


• SD 


• BD 


• BD 


• BD 




■ BYTE 


•SD 


*BL> 


• SD 


• BD 



CLD 
LDA 
STA 
LDX 
STA 
DEX 
BNE 
INC 
LDA 
STA 
STA 
STA 
STA 
JSR 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
STA 
LDA 
STA 
STA 
LDX 
STA 
DEX 
BPL 
JSR 
LDA 
STA 
LDA 
STA 
LDX 
LDY 
LDA 
JSR 
LDA 
STA 



iclaar decimal 
••00 Iget zero 
NMIEN idisplay off 
••7F laat indax 
•80, X iclr top page 

Idee pointer 
CLPa0 I dona? No. 
TITLE Ititle on flag 
»aFF Iget •FF 
LIVES laat dead 
SAMCTL I gaae control 
ESSCNT I no enemy shots 
PSSCNT Ino player shots 
SNDOFF I no sound on 123 
AUDCi+6 iturn off snd 4 



• •C4 
CDLDR0 

• •S4 



medium green 
I score color 
imedium blue 
COLOR0+1 itext color 
••0A ibrlght Hhite 
COLOR0+2 I shot color 
»*fB night blue 

COLDR0+3 itaxt color 

• <DLI iset DLI vector 
VDSLST I lOH byte 

• >DLI Iset DLI vector 
VDSLST+l Ihlgh byte 
••C0 lenabla Display 

ILiat Interrupts 
IPM DMA off 
IDMA control 
land shadow rag 
Iget zero 
Igraphics Ctrl 
ireset audio 
IS PM registers 
X iclr register 
Idee Index 

NOPM I done? No. 

SIOINV Unit sound 

• <TLDL IDL addr low 
SDLSTL IDL pntr low 

... r^j,^ tiigh 

?ntr high 
ank high 

• <VBLANK ivblank low 
•7 idefarrad 
SETVBV iset vblank 
*60 lone second 
DEADTM I dead time 



NMIEN 

• •32 
DHACTL 
8DMCTL 
•0 

BRACTL 
AUDCTL 

• 4 
SRAFP0. 



• >TLDL IDL addr high 
3DLSTL+1 IDL pntr hi 

• >VBLANK ivblank high 



Check conaole and triggers 



START 


LDA 


DEADTM 




BNE 


START 


CCHK 


LDA 


PTRIS0 




EOR 


PTRIBl 




BNE 


PDEV 




LDA 


BTRI80 




BEQ 


PDEV 




LDA 


CONSOL 




AND 


• 3 




CMP 


• 3 




BEQ 


CCHK 




AND 


• 1 


PDEV 


STA 


DEVICE 


RELMT 


LDA 


*10 




STA 


DEADTM 


RELHT2 


LDA 


DEADTM 




BNE 


RELMT2 




LDA 


CONSOL 




CMP 


• 7 




BNE 


RELWT 



llook dead time 
I alive? No. 
Ipaddla trig 
imaak w/PTRISl 
Ipuahad? Yas. 
istick trig 
Ipushed? Yes. 
Iget console 
I do START/SELECT 

I test buttons 
lany pushed? No. 
I mask off START 
Idevice switch 
I 1/6 second 
Idead time 
I debounca ! 
Itime Up? No. 
Igat console 
I Kays released? 
INo. loop until 



Clear PM Area and Playfleld 



LDA • >SCRN I acrn addr high 
STA lNDEX+1 Ipolntar high 
LDA ^0 Iget zero 
STA INDEX Ipolntar low 
LDX »1S |16 pages 0. .13 
TAY I use as Index 

STA (INDEX), Y Iclear ran 
INY inext byte 

BNE CL0 I page dbne? No. 
INC INDEX+1 Inext paga 



Dex 




BPL 


CLB 


1 DX 


• < 


STB 


MISL.X 


STA 


PLRetx 


RTft 


PLRl X 


3TA 


PLR2 X 


STfl 


PLR3, X 


DEX 




BNE 


CLPM 


LDA 


t OLIST 


STA 


BDLSTL 


LDA 


• >BLIBT 


STA 


SDLSTL+l 


LDA 


• >PM 


STA 


PMBABE 


LDA 


*«3e 


BTA 


sdhctl 


STA 


DHACTL 


LDA 


• 3 


BTA 


BRACTL 


1 DA 


ttli 


STA 


SPRIOR 


LDA 


»• 


STA 


TITLE 



IpAg* cQuntar 
;«crn don«7 No. 
(nOH cl«ar P/m 
iclear tilvsilac 
(clear plyr 8 
; cl car pi yr 1 
iclezr plyr 2 
Iclear plyr 3 
I den* 2S6 byt«B? 
I no, 1 oop back ! 

(Point to th« 
Inam* display 
Tll«t to ahow 
Ith* playfiald. 
iPn addraaa high 
I into hardwara 
lanabla alngle 
lllna raaolution 
IDMA control 
lanabla playar 
land nlsalla DMA 
I aet Up 
IP/M priority 
Igat zaro 
Ititla o-f-f 



Draw Tha Planat 



DPa 
DPI 



LDA 
BTA 
STA 
LDA 
STA 
BTA 
LDX 
LDY 
LDA 
BNE 
JMP 
Bni 
STA 
STA 
INY 
INX 
JHP 



• <PPOS 
INOXl 
INDX2 

• >PP08 
INDXl+1 
IMDX2+1 
*0 

*t 

DPTBL,X 

DP2 

SETUP 

DPRPT 

(INDXt) , 

(INDX2> , 



I plan 
I poi n 
I poin 
Iplan 
; poin 
I poi n 
Itabl 
lind 
Itabl 
I dona 
I cont 
Irapa 

Y Ipu 

Y Ion 
I inc 
I inc 
I cont 



at poa high 
tar HI loM 
tar #2 low 
at poa high 
tar «1 high 
tar •2 high 
a polntar 
X pointer 
a value 
7 No. 
i nua 
at? Yaa. 
t valuaa 
to acraan 
indax pntr 
tabla pntr 
i nua 



Repeat Byte Handler 



DPRPT 


ASL 


A 




STA 


TENP 




ASL 


A 




ASL 


A 




LDA 


• »S3 




Bca 


FILLl 




LDA 


• > 


FILLl 


PHA 






LDA 


DPTBL.X 




AND 


• «I9F 




BTA 


COUNT 




PLA 




F1LL2 


BTA 


(INDXl) 




STA 


(INDX2) 




INY 






DEC 


COUNT 




BNE 


FILL2 




INX 






LDA 


TEMP 




BPL 


DPI 




SEC 






LDA 


INDXl 




SBC 


*40 




STA 


INOXl 




BCS 


OPNl 




DEC 


INDXl+1 


DPNl 


CLC 






LDA 


INDX2 




ADC 


f40 




STA 


INDX2 




BCC 


DP* 




INC 


INDX2'i'l 




JHP 


DPS 



ishlft byte 
IneH line flag 
INL bit -> carry 
Icolor -> carry 
icolor 1 bita 
leolor 1? Yaa. 
Iget background 
leave color byte 
Itable value 
leaak 4 bita 
I aave aa count 
Iraatore color 

Y iput bytea 

Y lonto Bcrecn 
line indeK 
Idee byte count 
Idana7 No. 

line tabl e index 
Iget flag 
Inew line? No. 
I aet carry 
lYes. get low 
laubtract 40 
IneM low 
loverfloM? No. 
I decrement high 
Iclear carry 
Iget low 
I add 40 
I new low 
I overflow? No. 
lincreeent high 
Iconti nue 



Planet Draw Data 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



•EA 
«EA 
•CI 
»C1 

• CI 
»C1 

• CI 

• IS 

• Si 
»C1 

• 40 

• 82 

• CI 

• E2 



,^EA, 
,•13, 

,*ts, 

,•03 

,•03 

,*01 

,•81 

, »A6, 

,•05 

• •81, 
.•CI, 
,•03 

• •83 
,0 



•EA,^EA 
•A8,^S4 
•Aa|^34 
•A8,^S0 
•A8,^30 
•Aa,^40 
•EBI^ai 
•S4,«C1 
•A6,*S0 
•01, •Ab 
*S2,»E& 
*A4,*Se 
•E4,^B4 



Setup arbiter Coordlnatea 



LDX 
LDY 
CLC 
LDA 
ADC 
BTA 
BTA 
LDA 
ADC 
BTA 
STA 
SEC 
LDA 
SBC 
BTA 
STA 
LDA 
SBC 
BTA 
STA 
INY 
DEX 
BPL 
JHP 



»64 

• « 



I 
I 
I 

• 7& I 
OYTBL,X I 
ORBY4'*40. 
ORBY+aSB! 

• 80 [ 
OXTBL.X I 
□RBX.X I 
□RBX+^40 

• 80 I 
OXTBL,X I 

ORBX-r^Ce; 

• 96 I 
OYTBL.X I 
ORBY.X I 
ORBYi^C*. 



8U1 
INIT 



do 63 bytee 
quad 2/4 offset 
clear carry 
canter Y 
add offset Y 

Y I quad-2 Y 
X lquad-3 Y 
center X 
add offset X 
quad-1 X 

Y I quad-2 X 
•at carry 
center X 

•ub offset X 
X I quad-3 X 

Y lquad-4 X 
center Y 
aub offset Y 
quad-1 Y 

Y lqu«d-4 Y 
quad 2/4 offset 

Sued 1/3 offaet 
one? No. 
continue 



Orbiter X,y Coordinate Data 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 

.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



4.5.3. 


8.9;9; 


li 


12" 


13 


16 


IB 


"p 


21 


77' 


24 


73 


27 


27 


79 


79 


30 


30 


31 


31 


32 


32, 


34 


34 


34 


34 


S3 


32, 


ni 


na 


4R 


47' 


44 


44 


40 


39, 


36 


33 


30 


79, 


24 


23 


18 


'7, 


12 


11 


=,*,3; 



2,3 

10, 11 

13, 14, 14 

16; 17, 18 

20,20,21 

23,23,24 

23,26,26 

27,28,28 

29,30,30 

31,31 ,31 

32,32,32 

32;32,32 

34,54,34 
34,33,33 
S2,32!31 
3», 49149 
47;46:43 
43,42:41 
38,3b!37 
33:32,31 
28,27,26 
22,21 20 
16. is: 13 
9,6,7 



Display list interrupt 



PHA 

TXft 

PHA 

INC OLICNT 

LDA DLICNT 

AND tsa? 

TAX 

LDA DUBRT, 

ORA PLNCQL 

STA W3YNC 

STA COLPF0 

LDA ••8C 

STA COLPF0* 

PLA 

TAX 

PLfl 

RTJ 

.BYTE 0,2,4 
.BYTE 8;6;4 



Ace 
> Ace 

X register 

counter 

counter 
y 3 bits 

aa index 
anat bright 
net color 
rt of scan 
or planet 
ght blue 
ot color 
tore X 

— > X 
tore Ace 



I eav 
IX - 

I sav 
I inc 
Iget 
lonl 
I use 

X Ipl 
Ipla 
lata 
Icol 
Ibri 

1 lah 
I res 
I Ace 
Irea 
Iret 



,6 iplanet 

,2 I brightness 



Vertical blank routine 



CLD Iclear decieal 

LDX SAUCER laaucer flag as 

LDA P3CaLR,X lindex or 1 



STA PCOLR0* 
LDA »3 
STA DLICNT 

LDA t»ca 

STA NHIEN 
LDA CH 
CMP ••21 
BNE PCHK 
LDA PAUSED 
EOR ••FF 



lucer color 
Iget 3 

Ireset DLI coun 
lenable 
IDLI'B 

(keyboard char 
I Space bar? 
INo. Skip it 
Ipauae flag 
llnvert it 





STA 


PAUSEB 




LDA 


• •FF 




STA 


CH 


PCHK 


LDA 


PAUSED 




BEQ 


NQPAU 




LDA 


•0 




LDX 


»7 


NOSND 


STA 
DEX 


AUDF1,X 




BPL 


NOBND 




JMP 


XITVBV 


NQPAU 


LDA 


TITLE 




BNE 


NOCYC 




LDA 


COLORB+Z 




CLC 






ADC 


••10 




BTA 


COLORa+2 


NOCYC 


LDA 


EX8CNT 




BEQ 


N0PAU2 




L8R 


A 




L8R 


A 




STA 


AUDClf6 




LDA 


• 40 




STA 


AUDFl+6 




DEC 


EXaCNT 


NaPAU2 


LDA 


GAMCTL 




BPL 


CURSOR 




JMP 


TIMERS 



Iget eFF * 
ireeet keyboard 
I pause flag 
Ipausad? No. 
Iget zero 
Ido 8 bytea 
zero sound 
Idee index 
I done? No, 
I ex it VBLANK 
Ititla flag 
Ititle? Yaa. 

No. get color 
Iclear carry 
Inaxt color 

lexoloslan col . 
lexploaion ent 
I any? No. 
I count /2 
I count /4 
lexplo volume 
I ex pi oa ion 
lexplo frequency 
Idee count 
Igaee control 
I cursor? Yes. 
INo. skip 



Cursor handler 



CURSOR 
ERACUR 



NOTN 

N0T8 
NOTW 
NOTE 



BADY 
NKOALA 

SHOCUR 



LDY CURY Iget y pos 

LDX VS iclear S bytee 

LDA ••0F I now clear out 
AND MISL-3,Y laid curaor 
STA M18L-3,Y igraphiea, 

INY inext Y position 

DEX Idee count 

BPL ERACUR iloop until done 

LDA STICKB iread joyattek 

LDX CURX Iget X value 

LDY CURY Iget Y value 

L8R A lahift right 

BC8 NOTN I North? No. 

DEY I Move curaor up 

DEY I two aean lines 

L9R A lahift right 

BCS NOTS I South? No. 

INY I cursor down 

INY I two scan lines 

LSR A ishift right 

BCS NOTM I West? NaT 

DEX icursor left 

L8R A ishift right 

BCS NOTE I East? No: 

INX icuraor right 

CPX •48 itoo far left? 

BCC BADX lYea. aklp next 

CPX tt20a Itoo far right? 

BCS BADX lYaa. aklp next 

STX CURX INo. it's ok! 

CPY #32 Itoo far up? 

BCC BADY lYas. skip next 

CPY #224 Itoo far down? 

BCS BADY lYes. skip next 

STY CURY INo. it's ok! 

LDA DEVICE | KOALA switch 

BEQ NKOALA I KOALA PAD? 

JSR KOALA lYes. do it 

LDA PENFLB I koala nan fig 

BNE TIMERS I pen up? Yee. 

LDX »S iS bytes. . . 

LDY CURY Iget cursor Y 
LDA CURPIC.x Teursor pic 
ORA MIBL-3,Y inaak alssiles 
BTA MISL-3,Y I store eissiles 

INY inext scan line 

DEX Idee count 

BPL SHOCUR I done? No. 

LDX CURX Iget x poaition, 

DEX il lesa for... 
STX HFDSnB+3 leiasile 3 

INX 12 more for. .. 

INX Imisslle 2 
STX HPO8M0+2 leave position 



Handl 
TIMERS 
NOBWT 
NOT1M0 
NOTIMl 



a tiacra and orbit 



LDA 
BEQ 
DEC 
LDA 
BEQ 
DEC 
LDA 
BEB 
DEC 
LDA 
BEQ 
DEC 



BOnSWT 

NOBWT 

BOHBWT 

DEADTH 

NOTIH0 

DEADTH 

EXPTIH 

NQTIHl 

fXPTIM 

BOMTIH 

N0TIM2 

BOMTIH 



Iboab wait ent 
Iwalt over? Yai 
Idee count 
■death timer 
Izaro? yes. 
Idecrement It! 
I exp t i mer 
Izero? Yes. 
(decrement it! 
Iget boab time 
izero? Yes. 
(dec bomb time 



N0TIM2 
NOTOVR 



Nas3 

D0S3 



VBD0t4e 

t 

I Satall 
I 



LDA 
BPL 
JHP 
LDA 
BEQ 
INC 
LDY 
CLC 
LDA 
8TA 
ADC 
STfl 
ADC 
STA 
LDA 
LSR 
STA 
ROL 
ADC 
TAX 
INC 
LDA 
AND 
TAY 
LDA 
BTA 
LDA 
AND 
ORA 
STA 
DEX 
INY 
DEC 
BNE 
LDA 
BEQ 
LDY 
DEY 
DEY 
LDX 
CPY 
BCC 
CPY 
BC8 
LDA 
BTA 
DEY 
DEX 
BPL 
LDA 
STA 
INC 
LDA 
LSR 
AND 
TAX 
LDA 
STA 
STA 
LDX 
BPL 
LDA 
STA 
BEQ 
LDA 
STA 
LDA 
STA 
DEC 
LDX 
BPL 
LDA 
STA 
BEB 
LDA 
BTA 
LDA 
STA 
DEC 
LDA 
BEQ 
LDA 
CMP 
BCC 
CMP 
BCC 
LDA 
STA 
BEQ 
INC 
LDX 
CPX 
BMI 
LDX 
8TX 
LDA 
STA 
LDA 
STA 
JHP 



QAMCTL 

NOTOVR 

XITVBV 

SATLIV 

N08AT 

SCNT 

SCNT 

DRBX.Y 

8ATX 

*<7 

HPoane+i 

»2 

HP03M» 

ORBY, Y 

A 

SATY 

A 

• 36 

8ATPIX 

8ATPIX 

•«0a 

•8 

8ATEMP 

MISL.X 

*»F0 

SATSH.Y 

MISL.X 

8ATEMP 

SSAT 

SAUCER 

SOUNDS 

B0MBY»3 



»f 

• 32 
NXTSP 

• 223 
NXTSP 
SAUPIC, X 
PLR3,Y 



SSAULP 

B0nBX'>3 

HPOSP0+3 

SAUTin 

SAUTIH 

A 

•*«3 

SAUMtD.X 
SAUPIC^4 
SAUPIC+5 
PS8CNT I 
DOSl I 
•• 1 
AUDCl t 
TRY8Z 1 

• •A& I 
AUDCl I 
PLBHOT.X 
AUDFl I 
PSaCNT I 
ES8CNT I 
D0S2 I 

•• ; 

AUDCl -^2 I 
TRYS3 I 

• *A6 I 
AUDCl-i-Z I 
ENSHOT.X 
AUDFl i-i 
ESaCNT 
SAUCER 
NQS3 



I 
I 
I 

B0MBYt3 I 



• 36 
N0S3 

• 231 
D0a3 

• f) 

AUDCl+4 
VBOONE 
aSSCNT 
SSaCNT 
*12 
SET83 

• > 
88SCNT 

•*Aa 

AUDC1'^4 I 
SAUSND.X 
AUDFl-f* I 
XtTVBV I 



g««B control 
□amo ovar? No, 
iKlt VBLANK 
gat ■•t«lllt« 
allva? No, 
Inc count 
orbit Indax 
claar carry 
get X coord 
aava Pflald x 
X of-faat 
fhorizontal poa 
*2 of-faat for 
right alda 
gat Y coord 
dlvlda by 2 
for playflald 
raatora for PN 
acraan of-fact 
uaa aa Indax 
naxt aat. Inaga 
gat nunbar 
uaa bit 3 
uaa aa tndan 
do a bytaa 
aava count 
niaalla granhic 
■aak off 1,5 
add aat ahapa 
put playar al 
dac position 
dac Indax 
dac count 
dona? No. 
%*ucmr flag 
aaucar? No. 
aaucar Y poa 
-1 "^ 
-2 

IV Bean llnaa 
abova top? 
Yaa. akin it 
baloH bottoa? 
Yaa. aklp It 
I aaucar laaga 
atora playar 3 
naxt BCan 1 Ina 
dac indax 
dona? No. 
aaucar X poa 
Ifliova It 
aaucar tlaa 
gat countar 
72 

uaa only •. . 3 
aa X indax 
I aaucar aiddla 
I put in 
I aaucar imaga 
shot aound 
shot? Yaa. 
No. gat zaro 
voluAa for ahot 
aklp naxt 
ahot mound vol 
aat hardMara 
I ahot aound 
f raquancy 
dac ahot and 
anaay ahota 
ahota? Yaa. 
No. gat zaro 
into voluma 
aklp raat 
ahot aound vol 
aat hardware 
I ahot aound 
frequency 
dec ahot and 
aaucar flag 
aaucar? No. 
aaucar Y poa 
above top? 
Yaa. aklp 
balOH bottoB? 
No. make aound 
get zero 
no aaucar and 
aklp naxt 
inc aaucar cnt 
aaucar count 
at lialt? 
No. aklp next 
gat zero 
zero aaucer cnt 
aaucar vol una 
'aat hardware 
I aaucer aound 
aet hardware 
continue 



SATSH .BYTE 0,a,B.«0A 

.BYTE *b*,*bfl,»,» 
.BYTE »,e,».*t* 
.BYTE *bf,,»l)^,0,0 

.INCLUDE •D:PLANET2.M63 
.INCLUDE ttD:PLANET3.naa 
.END 



File: D:PLANET2.M43 



Initialize Miac. 



NIT LDA 
STA 
STA 
BTA 
STA 
BTA 
STA 
STA 
STA 
LDX 

CLRACT STA 
DEX 
BPL 
LDX 

INI8LN LDA 
BTA 
DEX 
BPL 
LDA 
STA 
BTA 
LDA 
STA 
LDA 
STA 
LDA 
BTA 
STA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
JSR 
LDA 
STA 
LDA 
BTA 
STA 



•0 Izaro 
SCORE lacor 
SCORE-M lacor 
8C0RE-4-2 tacor 
DEADTM idaad 
PAUSED Ipaua 
EXPCNT lexpl 
SAUCER I no a 
BLEVEL Iboab 
•11 ino b 
BOMACT.X Idea 

I next 
CLRACT I done 
• 1"? Iioro 
BCOINI.X Igat 
SCQLIN.X Iput 

I next 
INISLN I done 
••01 iget 
LEVEL Igaae 
SATLIV llive 
•4 Iget 
LIVE8 inueb 
••0C I aat 
COLaR0+2 tbrl 
•*34 laedi 
PCDLR0 Iboeb 
PCOLRe-rl Ibon 
PCOLR0+2 Ibon 
•127 leant 
CURX I curs 
•129 leant 
CURY I cure 
•1 Igat 
BAMCTL Igane 
BHOaco Idtap 
•aS4 Igrap 
8CRN-H93* Ipl 
•«19 Igrap 
SCRN-H94B Ipl 
HITCLR iraae 



out . , 
e byte 
e byte 1 
a byte 2 

tiner 
e flag 

counter 
aucer 

level 
onba ! 
cti vate 

bonb 
? No. 

•cere line 

byte 

acora line 

byte 
7 No. 
one 

level 

aatellita 
4 

r of livea 
axploalon 
ghtnaaa 
un red 

color 
b 1 color 
b 2 color 
er acraan X 
or X poa 
ar acraan Y 
or Y poa 
one 

control 
lay acara 
hic-LF of 
anet center 
hie-RT of 
anet center 
t eolllaion 



Sat up level variablea 



8ETLVL JSR 
LDX 
LDA 
STA 
LDA 
BTA 
LDA 
STA 
LDA 
CMP 
BNE 
LDA 
AND 

BAVEPC STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
CPX 
BEQ 
INC 

SAMLVL BED 
LDA 
CLC 
ADC 
STA 
CLD 



SHOLVL 
BLEVEL 
INIBOn, 



BOMBS 

INIBS.X 

BOMTI 

INIBC.X 

8AUCHN 

INIPC.X 

•»FF 

SAVEPC 

RANDOM 

• •F0 
PLNCOL 
INIBVL.X 
BOMVL I 
INIBVH, X 
BOMVH I 
INISV, X 
SAUVAL 

• 11 

SAMLVL 
BLEVEL 



LEVEL 



• 1 
LEVEL 



ghOM lave 
bonb lave 
I bomb a 
bonb coun 
bonb apae 
bonb tine 
X chance 
aaucar In 
planet eo 
level >14 
No. aklp 
randon eo 
naak off 
planet eo 
I bomb val 
aava it 
I bonb val 
aava it 
aaucer va 
aava that 
at level 
Yea. skip 
Inc bonb 
decinal 
gana lava 
clear car 
add one 



1 

1 

level 

t 

d 

r 

of 

level 
lor 
? 

next 
lor 
lun. 
lor 
ua low 



hi 

lue 

too 
11? 

next 
level 
ode 
1 • 
i-y 

level 

:inal 



ita ahapa table 



Main program loop 

}0P LDA PAUSED 
BNE LOOP 
LDA ^0 



BTA ATRACT 
LDA SAMCTL 
BPL CKCQRE 
LDA EXPCNT 
BNE CKCORE 
JMP END8AM 



■attract node 
Inane done? 
INo. check core 
lYea. axpl count 
I count done? No. 
■The End! 



Check planet core for hitt 



LDA aCRN*"" icentar LF 
AND »»»3 IRT color clock 

CMP •»03 lexploaion coir? 
BEQ PLDEAD I Yea. go dead 
LDA aCRN*l''40 icenter RT 
AND ••C0 ILF color clock 
CMP »«ce lexploaion coir? 

BNE PLANOK INo. akip naxt 



Iget zero 
izero bonba 
laatelite dead 
Igat ••FF 
Ino Uvea left 
Igana control 
Ino aound 



1 Planet 


ia Dead! 


1 
PLDEAD 

1 


LDA (0 

STA BOMBS 
STA SATLIV 
LDA ••FF 
STA LIVES 
STA SAMCTL 
JSR 8ND0FF 


1 Cheek 


conaola 


1 
PLANOK 

1 


LDA CONaOL 
CMP »7 
BEB NORST 
JMP PLANET 


1 Projec 


tile firing 



NORST JSR 


BOMINI 


LDA 


SATLIV 


BEQ 


NOTRIB 


LDA 


STRIQ0 


CMP 


LA8TRQ 


BEQ 


NOTRia 


STA 


LASTRS 


CMP 


•0 


BNE 


NOTRia 


JSR 


PROINl 


NDTRI8 JSR 


BOMADV 


LDA 


EXPTIM 


BNE 


NOEXP 


JSR 


CHK8AT 


JSR 


CHKHIT 


J3R 


EXPHAN 


JSR 


PROADV 


LDA 


SAUCER 


BEQ 


RE8TIM 


JSR 


88H00T 


RESTin LDA 


• 1 


STA 


EXPTIM 


NOEXP LDA 


BOMBS 


BNE 


LOOP 


LDA 


GAMCTL 


BMI 


LOOP 


LDA 


BOMACT 


ORA 


BOMACT 


ORA 


BOMACT 


ORA 


BOMACT 


BEQ 


JSL 


JMP 


LOOP 


JSL JMP 


BETLVL 



t g*t conaal • 
|«ny pr««s«d7 
INOa skip naxt 
I restart gA** ! 



(try n 
ISAtcllits st«t 
laltvs? No. 
I gat tr 1 gg«r 
) •««■ «a last VB 
I Y«s. skip n*Kt 
INo. sav9 trig 
I prassad? 
)No. skip naxt 
I strt projactlla 
I advanca Doaba 
I do axploaian? 
ino! 

tsatallita ok? 
lany hits? 
t handla axpl ■ 
f advanca snots 
isaucar flag 
isaucar? No. 
I Yaa. I«t shoot 
Igat ana 
I rasat tlmar 
l« bombs to go 
lany laft? Yas. 
I gaaa control 
Idaad? Yasa 
Iboab status 
■1 ibomb I status 
-2 Iboab 2 status 
-3 ibonb 3 status 
lany boabs? No. 
lYas. continua 
isatup naH laval 



Xnitiata a naH axplosion 



LDA ft64 

STA EX8CNT 

INC EXPCNT 

LDY EXPCNT 

LDA NEWX 

STA XPOS.Y 

LDA NEWY 

STA YPD8,Y 

LDA •« 

STA CNT.Y 
RTS 



I 1. 07 saconds 
I axpl sound cnt 
I ona fBora axpl 
luaa as indax 
Iput X coord 
tinto X tabla 
Iput Y coord 
llnto Y tabla 
llnit to zaro 
laxplosion iaaga 
iraturn 



nain ax pi OS 1 on handlar routina 



■• paused? 
■• To 



ig«t zmro 



ODp hera 



EXPHAN 
RUNLP 



LDA tt0 

STA COUNTR 

INC COUNTR 

LDA EXPCNT 

CnP COUNTR 



I Inl t to rare 
Izaro countar 
inxt axplosion 
Igat axplosion « 
lany mora axpl? 



Bni 


RTl 


INo. return 


1 nx 


COUNTR 


1 act tndvx 
llnlt plotclr 
la - plot block 


LDA 


•0 


STfl 


PLOTCLR 


LDA 


CNT.X 


IVKpl counter 
1*11 dr««n7 


CBP 


#37 


Bni 


DOPLOT 


■No. do It 


INC 


PLOTCLR 


1 1 - «ra>« block 


SEr 




1 Bet carry 
imrmum cycl« 


BBC 


• 37 


cnp 


• 37 


IBr««tt don«7 


Bn: 


DOPLOT 


INo. mrm,mm block 


TXA 




laova Indax 


TAY 




Ito Y r«gi«t»r 



Rspack ■xplosion tabic, gat 
rid of finlahad eHploalons 



REPACK INX 
CPX 
BEQ 
BPL 

RPKZ LDA 
8TA 
LDA 
8TA 
LDA 
STA 
INY 
BNE 

RPKEND DEC 
DEC 
JHP 

DOPLOT INC 
TAY 
LDA 
CLC 
ADC 
STA 
CMP 
BCS 
LDA 
ADC 
STA 
CMP 

Bca 

JSR 
LDA 
BNE 
LDA 
ORA 

PUTIT STA 
JHP 

CLEARIT LDA 
AND 
JMP 



EXPCNT 

RPK2 

RPKEND 

xpoa.x 

XPOB.Y 

YPOB.X 

YPOa.Y 

CNT.X 

CNT.Y 

REPACK 
EXPCNT 
COUNTR 
RUNLP 
CNT, X 

XPOS,X i 
I 
COORDl, Y 
PLOTX I 

• 160 I 
RUNLP I 
YPOB.X I 
C00RD2,Y 
PLOTY I 

• 96 I 
RUNLP I 
PLOT I 
PLOTCLR I 
CLEARIT I 
PLOTBL.X 

ILO),Y I 
(LO),Y I 
RUNLP I 
ERABIT.X 
(LOI.y' I 
PUTIT I 



naxt 

dona? 

No 

Ye 

get X 

move 

get Y 

Move 

get c 

Move 

inc 1 

next 

dec p 

due t 

contl 

Inc p 

e" 

get » 

cl ear 

I add 

■ ave 

off 

Yea. 

gat Y 

radd 

■ave 

off 

Yea. 

get p 

erase 

Yea. 

(get 

alte 

and r 

exit 

I eraa 

turn 

put 1 



exploalon 

epack Mora 
exit 

poaltlon 
back X 

poal tlon 
back Y 
Dunt 

back count 
ndex 
repack 
olntera 
o repack 
nua 

olnter 
haae In Y 
-coord 

carry 
X offset 
It 

creen? 
don' t plot 
-coord 
Y offset 
It 

crean? 
don't plot 
lot addr 

It? 
clear It 
plot bits 

display 
eplot It! 

bits 
off pixel 
t back 



Dedicated aultlply by 40 
Hlth result In Lo and HI 



LDA 


PLOTY 


Iget Y 


ASL 


A 


■shift 


STA 


LO 


isave 


LDA 


• 


Iget z 
I Inlt 


STA 


HI 


ASL 


LO 


1 Shi ft 


ROL 


HI 


Irotat 


ASL 


LO 


lahlft 


LDA 


LO 


Igat 1 


STA 


LOHLD 


1 save 


ROL 


HI 


Irotat 


LDA 


HI 


Iget h 


STA 


HIHLD 


1 save 


ASL 


LO 


(shift 


ROL 


HI 


Irotat 


ASL 


LO 


ishlft 


ROL 


HI 


irotat 


LDA 


LO 


Iget 1 


CLC 




iclear 


ADC 


LOHLD 


ladd 1 


STA 


LO 


leave 


LDA 


HI 


Iget h 


ADC 


HIHLD 


ladd h 


STA 


HI 


1 save 



-coord 

It left 
lOM *2 
ero 
high byte 

1 OM byte 
e high "4 

low byte 
OH byte 
loH ia 
e high «S 
Igh byte 
high tB 

lOH byta 
a high 'la 

loM byta 
a high •SZ 
OH aSZ 

carry 
ow *a 
lOH *40 
igh (32 
Igh eS 
high *40 



Bet offset into screen naaory 



LDA • <8CRN I screen addr lo 

CLC (Clear carry 

ADC LO ladd lou offset 

STA LO leave addr 1 oh 

LDA • 

ADC HI 

STA HI 

LDA PLOTX 

AND »3 

TAX 



Bin L.U I saw maar i oh 

LDA • >8CRN I screen addr hi 
'»"'' "• ladd high offset 
leave addr hi 
laask PLOTX for 
Ithe plot bits. 



LDA PLOTX 
LSR A 
LSR A 
CLC 

ADC LO 
STA LO 
BCC PLOTl 
INC HI 
LDY #0 
RT8 



iq«t PLOTX an 
■aivlde 
|by 4 

land add to 
(plot addres 
Ifor final 
I addraas. 
loverflOH? Y 
izaro Y ragl 
I return 



lot 

es. 
star 



Soab initializer 



BOniNI 


LDA 


BOMBNT 




BNE 


NOBINI 




LDA 


Bonss 




BNE 


CKLIVE 


NOB INI 


RT8 




CKLIVE 


LDX 


• 3 


CKLVLP 


LDA 


BONACT 




BEB 


BOTBOM 




DEX 






BPL 


CKLVLP 




RTB 




BDTBOn 


LDA 


• 1 




8TA 


BOMACT 




DEC 


BOMBS 




LDA 


• 




8TA 


BXHOLD 




STA 


BYHOLD 




LDA 


8AMCTL 




BNI 


NOSAUC 



Sftuccr handlvr 



CPX 


• 3 


BNE 


NOSAUC 


LDA 


RANDOM 


CNP 


BAUCHN 


BCS 


NOSAUC 


LDA 


• t 


STA 


SAUCER 


LDA 


RANDOM 


AND 


• •03 


TAY 




LDA 


BTARTX 


CHP 


• SFF 


BNE 


SAVES X 


JSR 


8AURND 


ADC 


• 3S 


SAVESX STA 


FROMX 


STA 


BQMBX. 


LDA 


START* 


CUP 


••FF 


BNE 


SAVEBY 


J3R 


8AURND 


ADC 


•3S 


8AVESY STA 


FROMY 


STA 


BOMBY, 


LDA 


ENDX.^- 


CMP 


•«FF' 


BNE 


SAVEEX 


LDA 


• 230 


SEC 




SBC 


FROMY 


SAVEEX STA 


TOX 


LDA 


ENDY.Y 


CHP 


• »FF 


BNE 


SAVEEY 


LDA 


FROMX 


SAVEEY STA 


TOY 


JMP 


BETBV 



Ibonb wait time 

Idona? No. 

laora boabe? 

lYee. skip RTS 

iNo. return 

If ind. . 
X I an aval labia. . 

Iboab? Yes. 

INo. dec index 

Idona? No. 

(return 

I thi a one is. . 
X I active noH 

lone less boab 

I zero out all.. 
X I vector X hold 
X (vector Y hold 

(gana control 

(saucer possible? 



(Yes. bonb (3? 
(No, ekip next ^ 
(randOM number 
(conpare chances 
(put saucer? No. 
(Yes. get one 
(enable saucer 
(randoa nuaber 
( range: 0. . 3 
(use as index 

,Y (saucer start X 
(randoa flag? 
(No. use as X 
(randoa X-coord 
(add X offaet 
IfroM X vector 

X (inlt X-coord 

,Y (saucer start Y 
IrandoM flag? 
INo. usa aa Y 
I randoa Y-coord 
ladd Y offset 
Ifroa Y vector 

X Unit Y-coord 
I saucer end X 
IrandoM flag? 
INo. use as X 
I screen right 
(offaet so not 
(to hit planet 
(to X vector 
I saucer end Y 
irandoM flag? 
INo. usa as Y 
luee X for Y 
Ito Y vector 
iskip next 



Bonb handler 



Iplace in X. 



NOSAUC LDA 
BMI 
LDA 
AND 
TAY 
LDA 
STA 

SETRBX LDA 
CMP 
BCS 
STA 
JMP 

BXMAX LDA 
AND 
TAY 
LDA 
STA 

BETRBY LDA 
CMP 
BCS 
STA 

BOnVEC LDA 



RANDOM 

BXMAX 

RANDOM 

• 1 

BMAXS.Y 
BOMBY, X 
RANDOM 

• 2S0 
SETRBX 
BOMBX.X 
BOMVEC 
RANDOM 

• 1 

BMAXa.Y 

BQMBX, X 

RANDOM 

•290 

BETRBY 

BOMBY, X 

BOMBX.X 



(randoa nuaber 
(coin flip 
(randoa nuaber 
laaka 0. . 1 
luse as index 
Itop/bottoa tbl 
Iboab Y-coord 
(random number 
(compare H/2S0 
(less than? No. 
(bomb X-coord 
Iskip next 
I random number 
Imaka 0. . 1 
(usa as index 
10 or 230 
(bomb x-coord 
(random number 
Icoapare H/2S0 
llBss than? No. 
(bomb Y-coord 
Iboab X-coord 



STA FROMX I shot from X 

LDA BOMBY, X (bomb Y-coord 

STA FROMY (shot from Y 

LDA aiza (planet center 

STA TOX (shot to X-coord 

STA TOY (snot to Y-coord 

JSR VECTOR (calc shot vect 



Store vector in table 



LDA LR 

BTA BOMBLR, 



(bomb L/R flag 
X (bomb L/R taSl 



LDA UD (bomb U/D flag 
STA BOMBUD,X (bomb U/D table 
LDA VXINC (velocity X Inc 
STA BXINC.X (Vel X table 
LDA VYING (velocity Y inc 
STA BYINC.X [Vel Y table 
RTS (return 



3aucer randoa generator 0..99 



LDA RANDOM 
AND ••7F 
CMP ^100 
BCS SAURND 
RTS 



(randoa number 
(0. . 127 

(compare h/100 
(less than? No. 
I return 



Saucer shoot routine 



LDA RANDOM I random number 

CMP •a I2.3X chance? 

BCS NOSS Hess than? No. 

LDX •? (7 - index 

LDA PROACT.X (projectile •? 

BEB SOTSS (active? No. 

DEX 16 • index 

LDA PROACT.X Iprojectlle •* 

BEB SOTSS (active? No. 

RTB (return, no shot 



Enable a saucer shot 



LDA 


• 48 


(PF center, Y 


BTA 


TOY 


(shot to Y-coord 


LDA 


• 80 


(PF canter X 


STA 


TOX 


(shot to X-coord 


LDA 


BOnBX+3 


(saucer x-coord 


SEC 




(set carry 
(PF offset 


SBC 


•44 


STA 


FROMX 


(shot from X 


STA 


PRDJX.X 


(X-coord table 


CMP 


• 1&0 


(screen X limit 


BCS 


NOSS 


Ion screen? No. 


LDA 


BOMBY+3 


1 saucer Y-coord 


SBC 


• 37 


IPF offset 


LSR 


A 


12 scan lines 


BTA 


FROMY 


ishot from Y 


STA 


PROJY.X 


lY-coord table 


CMP 


• 93 


iscreen Y limit 


BCS 


NOSS 


ion screen? No. 


LDA 


• 13 


I shot snd time 


STA 


E88CNT 


lameny snd count 
icontlnuc 


JMP 


PROVEC 



Projectile initialiiar 



PRO INI 
PSCAN 



LDX »S 

LDA PROACT, 

BEB aOTPRO 

DEX 

BPL PSCAN 

RTS 



|6 projectiles 
X Iget status 
lactlve? No. 
lYee. try again 
I done? No. 
I return 



-°- * projectile! 



QDTPRO 



LDA •IS 
STA PS8CNT 
LDA SATX 
STA FROMX 
STA PRDJX.X 
LDA 8ATY 
BTA FROMY 
?I5 PRQJY.x 
L|A CURX 

SBC ^48 
STA TOX 
LDA CURY 
SEC 
SBC •SZ 



IP 



hot and time 
layer sht snd 
atelllta X 
hot from X 
roj X table 
atellite Y 
hot from Y 
roj Y tabLjp 
ursor X-coord 
et carry 
layfld offset 
hot to X-coord 
ursor Y-coord 
et carry 
layfld offset 



LSR fl 

STB TOY 
JBR VECTOR 
LDA VXINC 
STfl PXINC.X 
LDA VYINC 



IZ line ra» 
(shot to Y-coord 
{compute v»ct 
IX incrvmant 
IX inc table 
lY incraaent 



STfl PYINC.X lY Inc table 

LDA LR IL/R flag 

STft PROJLR.X IL/R flag table 

LDA UD lU/D flan 

STA PROJUD.X lU/D -flaa table 

LDA »1 jactlve 

STA PROACT.X Iproj statue 

RT8 ireturn 



1 Bomb 


advance handl 


er 


1 

BOMADV 


LDA 


BQMTin 


Ibonb tlner 




BNE 


RT2 


Ittee up7 NO. 




LDA 


LIVES 


lany lives? 




BPL 


RESBT 


■Yes. skip next 




LDA 


HI 


1 speed up bombs 
isKlp ncKt 




BNE 


SETBTM 


RESBT 


LDA 


BOMTI 


1 get bomb speed 


SETBTM 


STA 


BOMTIM 


ireset timer 




LDX 


• 3 


icheck 4 bombs 


ADVBLP 


LDA 


BOMACT, 


X ibofflb on? 




BES 


NXTBOn 


INo. try next 




JSR 


ADVIT 


1 advance bomb 




LDA 


LIVES 


lany lives left? 




BPL 


SHOBOn 


lYes. skip next 




J8R 


ADVIT 


INo. move bombs 




JSR 


ADVIT 


14 times faster 


, 


JSR 


ADVIT 


Ithan normal 


1 We've 


noM 


ot undated bomb 


1 coordinates -for pi 


ottlng! 


8H0B0M 


LDA 


BOMBY, X 


Ibomb Y-coord 




CLC 




iclear carry 




ADC 


• 2 


Ibomb center off 




STA 


INDXl 


laava it 




LDA 


*0 


Iget zero 
llnit loH byte 




STA 


LO 




TXA 




1 index to Ace 




ORA 


• >PLR0 


Imask w/address 




STA 


HI 


llnit high byte 
IX temp hold 




STX 


INDX2 




CPX 


#3 


1 saucer slot? 




BNE 


NOTSAU 


INo. skip next 
Isaucer in slot? 




LDA 


SAUCER 




BNE 


NXTBON 


lYas. skip bomb 


NOTSAU 


LDY 


BOMBLR, 


X IL/R flag 
Ido 17 bytes 




LDA 


«17 




STA 


TEMP 


1 set counter 




LDX 


BPSTRT, 


Y istart position 




LDY 


INDXl 


Ibomb Y pos 


BDRAW 


CPY 


*32 


I off screen top? 
lYcs. skip next 




BCC 


NOBDRW 




CPY 


#223 


iscreen bottom? 




BCS 


NOBDRW 


lYes. skip next 




LDA 


BOMPIC, 


X Ibomb picture 




STA 


<L0) ,Y 


Iput in PM area 
IPM index 


NOBDRW 


DEY 






DEX 




{picture index 




DEC 


TEMP 


Idee count 




BNE 


BDRAW 


Idone? No. 




LDX 


INDXZ 


{restore X 




LDA 


BOMBX.K 


Ibomb X-coord 




STA 


HPOSPi, 


X {player pos 
{more bombs? 


NXTBOn 


DEX 






BPL 


ADVBLP 


lyes ! 


1 


RTB 




(all done! 


1 Projectile 


advance handler 



PROADV LDX 
PADVLF LDA 
BEQ 
LDA 
STA 
LDA 
STA 
8TX 
JSR 
LDA 
AND 
STA 
LDX 
JSR 
LDA 
CMP 
BCS 
STA 
LDA 
CMP 
BCS 



*11 

BOMACT 

NXTPRO' { 

BQMBX.X 

PLQTX 

BOMBY, X 

PLOTY 

XHOLD 

PLOT 

(LO) ,Y 

erabIt.x 

<LO>,Y 

XHOLD 

ADVIT 

BOMBX, X 

*16ei 

KILPRO 

PLDTX 

BOMBY, X 

#96 

KILPRO 



do 8: 11 
(active? 
No. skip 
bomb X-c 

g I otter 
omb Y-c 
5 letter 
-reg te 
calc plo 

?at plot 
erase b 
replace 
restore 
advance 
bomb X-c 
off sere 
Yes. kil 

El otter 
omb Y-c 
off screi 
Yes. kil 



next 
oord 
X 

oord 
Y 

mporary 
t addr 

byte 
it 

byte 
X 



1 it 
X 

oord 
en? 
1 it 



STA 
JSR 
LDA 
AND 
BEQ 
LDX 
LDA 
STA 
LDA 
STA 
JSR 

KILPRO LDA 
STA 
JMP 

PROJOK LDA 
LDX 
AND 
ORA 
STA 

NXTPRO DEX 
CPX 
BNE 
RTS 

I 



PLOTY 

PLOT 

PLOTBL, 

<L0> ,Y 

PROJOK 

XHOLD 

PLOTX 

NEWX 

PLOTY 

NEWY 

NEMEXP 

#0 

BOMACT, 

NXTPRO 

PLOTBL, 

XHOLD 

PROnSK, 

(L0> , Y 

<L0) , Y 

• 3 
PADVLP 



Iplo 

leal 

X Ige 
Iciik 
INo 
ire 
I pro 
lexp 
Ipro 
lexp 
{set 
Iget 

X Ikl 
I ski 

X {pi 
Ires 

X I m 
{add 
I rep 
( nex 
I pro 
(No. 
Iret 



tter 

t £l 

col 

plo 

tore 

X 

o X 

Y 

o Y 

off 

zer 

11 p 

p nc 

at m 

tore 

ak c 

pla 

lace 

' E' 

1 »3 
con 
urn 



ot addr 
ot mask 
lislon 
t it 

X 
coord 

coord 
coord 

coord 

sxplo 

roj 
xt 

sk 

X 
olor 
yf leld 

byte 
ojectlle 

yet? 
t inue 



File: D:PLANET3.M6S 
Check satellite status 



CHKSAT 


LDA 


DEADTM 


(satellite ok? 




BEQ 


LIVE 


INo. skip next 


CHKSX 


RTS 




1 return 


LIVE 


LDA 


LIVES 


Hives left? 




BMI 


CHKSX 


INo. exit 




LDA 


• 1 


Iget one 




STA 


8ATLIV 


{set alive flag 




LDA 


M»PL 


Idid aatelllte 




ORA 


MBPL+l 


{hit any bombs? 
(No. exit 




BEQ 


CHKSX 




LDA 


#0 


(get zero 

(kill satellite 




STA 


SATLIV 




STA 


BCNT 


(inlt orbit 




LDX 


LIVES 


lone less life 




STA 


SCOLIN+ 


14, X lerasa life 




DEC 


LIVES 






BPL 


MORSAT 


{any left? Yes. 
(lot of bombs 




LDA 


• 2SS 




STA 


BOMBS 






STA 


BAMCTL 


(end game 




JSR 


SNDOFF 




MORSAT 


LDA 


SATX 


1 sat X-coord 




STA 


NEHX 


(explo X-coord 
Isat Y-coord 




LDA 


SATY 




STA 


NEMY 


lexplo Y-coord 
1 set off explo 




JSR 


NEWEXP 




LDA 


»S0 


llnit sat X 




STA 


SATX 


Isat X-eoord 




LDA 


#21 


(inlt sat Y 




STA 


8ATY 


(sat Y-coord 




LDX 


#0 


(don't BhOM the 


CLRSAT 


LDA 


MISL.X 


Isatellite pic 




AND 


#»FB 


mask; off sat 




STA 


MISL.X 


(restore data 




DEX 




(dee Index 




BNE 


CLRSAT 


(done? No. 




LDA 


• »FF 


I4.2S seconds 




STA 


DEADTM 


{till next life! 




RTS 




Ireturn 



Check console keys 



END8AM 
ENDSLP 



JSR SNDOFF 
LDA STRISa 
AND rTRIO0 
AND PTRISl 
BEQ END8L1 
LDA CONSOL 
CMP #7 
BEQ ENDSLP 
JMP PLANET 



Ino sound 123 
(Stick trigger 
(uask M/paddla 
(mask M/paddls 1 
i»ny pushed? No, 
(chk console 
(any pushed? 
(No. loop here 
(restart game 



Turn off aound rags 12 3 



SNDOFF LDA #0 {zero volume 

STA AUDCl (to sound tti 

STA AUDCH-2 (sound #2 

STA AUDC1>4 (sound #3 
RTS (return 

1 

{ Check for hits on bombs 
, 



CHKHIT 


LDX 


#3 


4 bombs 0. .3 




LDA 


SAUCER 


saucer enabled? 




BEQ 


CHLOOP 


No. skip next 




LDA 


#0 


get zero 




STA 


BOMCOL 


collision count 




LDA 


SAMCTL 


gamm over? 
Yes. skip next 




BMI 


N08C0R 




LDA 


BOMBX+3 


saucer X-coord 




CMP 


#39 


off screen If? 




BCC 


N08C0R 


Yes. kill it 




CMP 


#211 


off screen rt? 




BCS 


NOSCOR 


Yes. kill it 




LDA 


BOMBY+3 


saucer Y-coord 




CMP 


#19 


off screen up? 




BCC 


NOSCOR 


Yes. kill it 




CMP 


• 231 


off screen dn? 




BCS 


NOSCOR 


Yes. kill it 


CHLDOP 


LDA 


#0 


get zero 




STA 


BOMCOL 


collision count 




LDA 


P0PF,X 


playf collision 
w/shot-t-planet 
hit either? No. 




AND 


#«0S 




BEQ 


NOBHIT 




INC 


BOMCOL 


Yes. inc count 




AND 


#*04 


hit shot? 




BEQ 


NOSCOR 


No. skip next 




LDA 


BAMCTL 


game over? 
Yes. skip next 




BMI 


NOSCOR 




LDA 


#2 


l/30th second 




STA 


BOMBWT 


bomb Halt time 




CPX 


#3 


saucer player? 
No. skip this 




BNE 


ADDBS 




LDA 


SAUCER 


saucer on? 




BEQ 


ADDBS 


No. this this 




LDA 


SAUVAL 


saucer value 




STA 


8C0ADD+1 


(point value 




JMP 


ADDIT 


add to score 



Add bomb valu* to acor* 



ADDBS 


LDA 


BOMVL 


bomb V 




STA 


8C0ADD'r2 






LDA 


BOMVH 


bomb V 




STA 


SCOADD-M 




ADDIT 


STX 


XHOLD 


save X 




JSR 


ADDSCQ 


add to 




LDX 


XHOLD 


reator 


NOSCOR 


LDA 


#0 


get ze 
1 ki 11 




STA 


BOMACT, X 




LDY 


BOMBLR, X 
BOMBX, X 


IL/R f 




LDA 


bomb X 




SEC 




set ca 




SBC 


BXOF,Y 


bomb X 




STA 


NEMX 


Iplotte 
ifiomb Y 




LDA 


BOMBY, X 




SEC 




set ca 




SBC 


• 40 


bomb Y 




LSR 


ft 


2 line 




STA 


NEWY 


plottc 




LDA 


SAUCER 


saucer 




BEQ 


EXPBOM 


No. ex 




CPX 


•3 


bomb p 




BNE 


EXPBOn 


Yes. B 




LDA 


#0 


lost ze 
(kill s 




STA 


SAUCER 




JSR 


CLRPLR 


clear 




LDA 


BAMCTL 


( game o 
lYes. s 




BMI 


NOBHIT 


EXPBQM 


JSR 


CLRPLR 


clear 




LDA 


BOMCOL 


collis 




BEQ 


NOBHIT 


No. sk 




JSR 


NEWEXP 


inlt e 


NOBHIT 


DEX 




dec In 




BPL 


CHLOOP 


idone? 




STA 


HITCLR 


ireset 




RTS 




ireturn 



i/«lu« 
inc 
val UB 
inc 
ragl 
■ cor 
B X 
tro 
bonb 
Flag 
■' -coor 
»rry 
of fft 
r X-c 
-coor 

o^-fs 

res 

r Y-c 

r? 

3I od« 

L«y«r 

BKpl Od 

Bro 
iBucer 

playB 
avBr? 
skip n 

pl«yB 
■1 Dnft? 
kip th 

BXpl Oft 

rtdcx 
No. 
coll t 



lOH 

low 
high 
high 
ster 



oord 

d 

et 

oord 

it 
7 

• it 



1ft 
Ion 



AdvancB bomba/projectl Isa 



ADVIT LDA 


BXHOLD, 


X Ibomb X-sum 


CLC 




iclear carry 


ADC 


BXINC, X 
BXHOLfi, 


ladd X-increment 


STA 


X {replace X-sum 


LDA 


• 


{get zero 


ROL 


A 


{carry - 1 
!X-delta 


BTA 


DELTBX 


LDA 


BYHOLD, 
BYlNC.Jc 
BYHOLD, 


X Ibomb Y-sum 


ADC 


{add Y-increment 


STA 


X (replace Y-sum 


LDA 


• 


Iget zero 


ROL 


A 


(carry • 1 
{ Y-del ta 


STA 


DELTAY 


LDA 


BOMBLR, 


X (bomb L/R flan 
(go left? Yes. 
(bomb X-coord 


BEQ 


ADVLFT 


LDA 


BOMBX, X 
DELTAX 


ADC 


(add x-delta 


JMP 


ADVY 


(Skip next 
(bomb x-coord 


ADVLFT LDA 


BOMBX, > 


SEC 




(set carry 
- !sub X-d«lti 


SBH 


hELTAX 



STfl BOMBX.X l««v« X-caord 
LDA BOnBUD.X (bomb U/D fl*a 
BEQ ftDVDN Igo down? Y«». 
LDfl BOPIBY.X iSoab y-coord 
SEC l«>t carry 

SBC DELTAY Hub Y-d>lt« 
JMP ADVEND laklp next 
LDA BOnBY,X IbOBb Y-coord 
CLC icl««r carry 

ADC DELTAY ladd Y-d»lti 
STA BOHBY.X t sav* Y-coord 
RT8 lr»turn 



Claar out playar Indicated 
by tha X register ! 



LDA 90 I moy« player... 
STA HPOSPB.X loff Screen. 
TAY Unit Index 

TXA iget X 

ORA • >PLR0 laask H/addre» 
STA HI Iplr addr high 
TYA I Sec - B ' 

STA LO Iplr addr low 
STA (LD>,Y liero player 
DEY Idee index 

BNE CLPLP I done? No. 
RTS I return 



Calculate target vector 



VECTOR 


LDA 


*e 




STA 


LR 




LDA 


FROMX 




CMP 


TOX 




BCC 


RIBHT 




SBC 


TOX 




JMP 


VECY 


RISHT 


INC 


LR 




LDA 


TOX 




SEC 






SBC 


FROMX 


VECY 


STA 


VXINC 




LDA 


• 1 




STA 


UD 




LDA 


FROMY 




CMP 


TOY 




BCC 


DOWN 




SBC 


TOY 




JMP 


VECSET 


DOWN 


DEC 


UD 




LDA 


TOY 




SEC 






SBC 


FROMY 


VECSET 


STA 


VYINC 




□ RA 


VXINC 




BNE 


VECLP 




LDA 


oeSB 




STA 


VXINC 


VECLP 


LDA 


VXINC 




BHJ 


VECEND 




LDA 


VYINC 




BMI 


VECEND 




ASL 


VXINC 




A3L 


VYINC 




JMP 


VECLP 


VECEND 


RTS 





Iget zero 
Igolng left 
l-frodi X-caord 
IM/to X-coord 
Ito right? Yea. 
Iget X-dl*f 
laklp next 
Igolng right 
Ito X-coord 
I aet carry 
Iget X-dlf-f 
faave difference 
Iget one 
Igolng up flag 
I from Y-coord 
iw/to Y-coord 
Idoiin? Ye». 
Iget Y-dlff 
Isklp next 
Igolng down flag 
Ito Y-coord 
I aet carry 
Iget Y-dlff 
I are both 
Idlstances 07 
INo. iklp next 
I aet H Increment 
Ito default. 
I X vector 1 ncre 
I >1277 Ye». 
lY vector Incre 
I >127? Yea. 
Itleea 2 until 
lone la >127 
I contl nue 
Ireturn 



Add to score 



ADDSCO 



ASCLP 



LDY •0 Unit index 
SED Idecimal aode 

CLC iclear carry 

LDX ^2 ido 3 bytaa 
LDA SCORE. X Iget acore 
ADC SCOADD.X fadd boab valui 
STA SCORE, X leave acore 
STY SCOADD.X Izero value 
DEX inext Byta 
BPL ASCLP I done? No. 
t-LD Iclear decimal 



Show acore 



SH08CD 



SSCOLP 



LDA tai0 
STA SHCOLR 
LDX •! 



Iput color 
I in hold Mrmm 
--■■ -• 12nd Una char 

LDY t0 idlglta 1,2 
LDA SCORE, Y Iget dlglta 
JSR 8H0BCD lahow ■ aa 
'"" {advance acore 

lllne pointer 
inext z dlglta 
Idone 67 
I no ! 
tall done! 



INX 

INX 

INY 

CPY »3 

BNE SSCOLP 

RTS 



Show level number 



8H0LVL LDY **S0 I uae color 2 

STY SHCOLR laave it 

LDA LEVEL Iget level * 

LDX 011 ll2th char on Una 



Show 2 BCD dlglta 



I 

I 

I KOALA 

I 



I The fo 
I algorl 



STA 8H0BYT laave digits 
AND t»0F Iget lower digit 
ORA SHCOLR ladd color 
STA SC0LIN+1,X Ishow it 
LDA 8H0BYT fget both again 
LSR A laaak. . . 
LSR A loff. . . 
LSR A I upper . . . 
LSR A Idiglt 
ORA SHCOLR |add color 
STA SCOLIN.X lahow it! 
RTS land exit. 



PAD interface 



llowlng filtering 
thai Is used: 



I Sivan 3 points 81,82,83,84,33 

I Rl-8H-82+S2fS3 

I R2-82+S3*83+S4 

I R3-83+84-1-84+83 



i 
I 
I 

I This 
I 

I AV8- ( 



AVB-(RH-R2+R2+R3) /16 
educes to; 
l+82«4+83»6*-S4»4 + 83l / 16 



I Rotate pointa through queue 



I 
I 

KOALA 
ROT 



LDX •4 
LDA XQ-1, 
STA XQ,X 
LDA YQ-1, 
STA YQ.X 
DEX 
BNE ROT 



Ido S bytea 
laove X queue 
I up one byte 
I move Y queue 
lup one byta 
Idee count 
Idone? No. 



Clear out the curaor 



LDY CURY 

LDX tS 

LDA MISL,Y 

AND aaFB 

STA MISL.Y 

DEX 

BPL CCURS 



Iga 

Ida 6 bytes 
Iget fflaailaa 
Inaak off low 
Iput back 
Idee count 
Idone? No. 



Insert new paint into queue 



LDA 01 
STA PENFLB 
LDA PADDL0 
STA XQ 
CMP »S 
BCC KOALAX 
LDA PADDLi 
STA YO 
CMP 03 
BCC KOALAX 



I pen Up flag 

I aet pen up 

IX input 

Iput In queue 

lacrean boundary 

ton screen? No. 

lY input 

Iput in queue 

isereen boundary 

Ion screen? No. 



Filter the X-Y queues 





LDA 


t <XQ 




STA 


PTR 




LDA 


>XD 




STA 


PTR+1 




JSR 


FILTER 




BC8 


KOALAX 




ADC 


016 




CMP 


04S 




BCS 


FLF 




LDA 


048 


FLF 


CMP 


0208 




BCC 


FRT 




LDA 


0207 


FRT 


STA 


CURX 




LDA 


<YB 



I queue addr low 

Ipolnter low 

I queue addr high 

Ipolnter high 

■filter X data 

I good data? No. 

M of feet 

|f«r left? 

INo. skip 

I screen left 

Ifar right? 

INo. skip 

Iscraan right 

Iput X coord 

I queue addr low 



PUP 

FDN 



BTA 
LDA 
STA 
JSR 
BCS 
ADC 
CMP 
BCS 
LDA 
CMP 
BCC 
LDA 
STA 



PTR 

>Ya 

PTR+l 

FILTER 

KOALAX 

016 

032 

FUP 

032 

0224 

FDN 

0223 

CURY 



Ipolnter low 
I queue addr high 
Ipolnter high 
IfUter Y data 
I goad data? No. 
lY offset 
I above top? 
INo. akin 
lacreen top 
Ibelow bottom? 
INo. akin 
lacreen bottom 
Iput Y coord 



Paddle trigger handler 



LDA PTRiea 
EOR PTRIBl 
EOR 01 
STA 8TRIQ0 
LDA 00 
STA PENFLB 
RTS 



Inaddle trig 
)EOR W/PTRISI 
Unverae data 
Iput in 8TRIB0 
I pen down flag 
I set pen down 
I contl nua 



Filter algorithm, initialize 



LDA 00 

LDX 04 

STA 8H,X 

DEX 

BPL FILC 

STA AVS 

STA AVS+l 

TAY 

LDX 01 



Iget zero 
Ido 3 bytes 
Ihlgh byta tabli 
Idee count 
Idone? No. 
leverage low 
leverage high 
ixero In Y 
lone in X 



Process the X-Y samplea 



LDA <PTR) , Y Iget 81 

STA 8L,Y laave low byte 

INY line pointer 

JSR MUL4 Iprocies 82 

LDA (PTR) , Y Iget 83 

ASL A Itlmes 2 

ROL SH X irotate carry 

ADC (PTR),Y ladd - tlaes 3 

BCC FIL2 loverflow? No. 

INC 8H,X line high byte 

A8L A Itlmes S ' 

ROL SH,X Irotate carry 

STA 8L,X laave low byta 

INX line pointer 

INY line pointer 

JSR MUL4 I process 84 

LDA (PTR),Y Iget 85 

STA SL,Y leave low byte 



Total aamplee 



LDX 04 
LDA SL.X 
ADC AVS 
STA AVS 
LDA SH.X 
ADC AVQi-l 
STA AVB+1 
DEX 
BPL ALOOP 



ladd 3 elements 
Iget low byte 
ladd to average 
laave low byte 
Iget high byte 
ladd to average 
leave high byte 



c poi n 

le? No 



Divide total by 16 



LDX 04 
LDA AVB 
DIV16 LSR AVB+1 
ROR A 
DEX 

BNE DIV16 
TAX 



lahift 4 bite 
Iget lo byte 
irotate high 
irotate low 
Idee count 
Idone? No. 
I aave Ace 



Compare average with DELTA 



LDY 04 
SEC 



IS byte table 
I aet ctrry 



S5S <PTR),Y icoaparo points 
ono =„_. -negative? No. 



BCS POBI 
EOR 0»FF 
ADC 01 
CMP 024 
BCB FAIL 
TXA 
DEY 



inegate byte and 
1+1 • ABB value 
iwlthln DELTA? 
lNo. abort 
Iget Aec egaln 
Idee pointer 
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Attention Programmers! 

ANALOG Computing is interested in programs, articles, and software review submissions deal- 
ing with the Atari home computers. If you feel that you can write as well as you can program, then 
submit those articles and reviews that have been floating around in your head, awaiting publica- 
tion. This is your opportunity to share your knowledge with the growing family of Atari computer 
owners. ANALOG pays between $30.00-$360.00 for all articles. All submissions for publication 
must be typed, upper and lower case with double spacing. Program listings should be provided in 
printed form, and on cassette or disk. By submitting articles to ANALOG Computing, authors ac- 
knowledge that such materials, upon acceptance for publication, become the exclusive property 
of ANALOG. If not accepted for publication, the articles and/or programs will remain the property 
of the author. If submissions are to be returned, please supply a self-addressed, stamped envelope. 
All submissions of any kind must be accompanied by the author's full address and telephone 
number. Send programs to: Editor, ANALOG Computing, P.O. Box 23, Worcester, MA 01603. 
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BOOT CAMP 

An Assembly 

Language Tutorial 

Column* 



by Tom Hudson 



In this month's Boot Camp, we're going to finish 
our discussion of X and Y register indexing and 
become proficient in multi-byte addition. 

Regular Boot Camp readers will be happy to 
know that the introductory material will be 
completely covered in the next few issues. After that, 
we can start applying all the 6502 instructions to 
useful subroutines and full-scale programs! 
Solution #2. 

I hope everyone at least tried to solve the indexing 
problem presented last issue. This problem asked 
readers to write the code necessary to copy the 
contents of the 6-byte TABLE 1 to TABLE2 in 
reverse order. This little brain-teaser is an excellent 
opportunity to gain more experience with the 6502 
index registers. 

Figure 1 shows the code necessary to copy 
TABLE 1 to TABLE2 in normal order. This figure 
was shown last month. 



10 #- $608 

26 LDX nS 

38 COPY LOft TABLE1,K 

48 STfl TABLE2,K 

58 DEK 

68 BPL COPY 

78 BRK 

88 TflBLEl .BYTE 18,28,38,48,58,68 

36 TflBLE2 «=»+6 

8188 .END 



Figure 1. 

I told you that only three changes to this code 
would allow it to copy the table in reverse order. The 
changed code is shown in Figure 2. 



18 *= $688 

20 LDX Its 

38 LDV no 

48 COPY LDft TaBLEl,K 

58 STft TA8LE2,Y 



68 


IHY 


78 


DEK 


88 


BPL COPY 


98 


BRK 


8188 


TftBLEl .BYTE 18,28,38,48,58,68 


8118 


TftBLE2 »r»46 


8128 


.END 



Figure 2. 

How does it work? Let's step through the code and 



see. 



Line 20 sets the X register to 5. This register 
will be used to point to different parts of 
TABLE 1. With the index starting at 5, the 
register will point to the last byte of TABLEl. 

Line 30 sets the Y register to 0. This register 
will be used to point to varying places in 
TABLE2. Unlike the X register, the Y register 
will start pointing at the first byte of TABLE2. 

Lines 40-80 perform the table data move 
function. 

Line 40 loads the accumulator with a byte 
from TABLEl, indicated by the X register. 

Line 50 stores the byte just loaded into a 
byte of TABLE2, indicated by the Y register. 

Lines 60 and 70 are the heart of this 
routine. Note that the Y register is 
INCREMENTED each time the BACKWD 
loop is executed, while the X register is 
DECREMENTED. Figure 3 shows the X and Y 
register contents for each iteration of the loop. 



TflBLEl 


TaBLE2 


CK) 


fY) 


5 


8 


4 
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3 
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2 


3 


1 


4 





5 



Figure 3. 
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By looking at Figure 3, you can see that the 6th 
byte (5 + 1) of TABLE 1 will be moved to the 1st byte 
(0+1) of TABLE2, the 5th byte of TABLEl to the 
2nd byte of TABLE2, and so on. 

Line 80 loops back to the BACKWD label if 
the X register is positive (0-127). Once the X 
register is decremented past 0, it "wraps 
around" to binary 1111111, or -1 decimal, and 
the program stops at the BRK instruction in line 
90. 

Line 100 sets up the initial values contained 
in TABLEl. 

Line 110 tells the assembler to reserve 6 
bytes for TABLE2. Remember, the "*=*+" 
directive allows you to set aside any number of 
bytes for tables, working areas, etc. 

As a further example of the "reverse table" 
problem, Figure 4 shows the BASIC equivalent of 
the assembly code in Figure 2. 

10 DIM TABLEl(5),TABLE2f5) 

15 TflBLEl CeJ =18 : TABLEl CIJ =29 : TftBLEl t23 

=38 : TftBLEl t3) =48 : TABLEl f 4> =58 : TABLEl (5 

J =68 

28 X=5 

30 Y— 8 

48 A=TABLE1CX) 

58 TABLE2CVJ=A 

68 Y=V+1 

78 K=X~1 

88 IF K>=e THEM 48 

98 END 

Figure 4. 

Note that, in BASIC, it is necessary to initialize the 
TABLEl array (line 15). This does the same thing as 
the .BYTE directive in line 100 of Figure 2. 

This should give you a good idea of how indexing 
works. If you still have trouble, re-read last month's 
discussion of indexing and try developing your own 
simple problems. 

Math revisited. 

As promised last month, we're going to start 
looking at multi-byte math operations, both in 
binary and binary coded decimal (BCD). 

Why do we want to bother with multi-byte math? 
If you're only working with numbers from 0-255, 
then single-byte math is fine. But what happens when 
you're writing the ultimate game program and need 
to show scores into the hundreds of thousands of 
points? Multi-byte math is the answer. 

The simplest form of multi-byte math is probably 
two-byte address storage. The 6502 can address 
65536 (or 2^*) bytes of memory. Observant read- 
ers will note that this number will easily fit into two 
eight-bit bytes. 

You've probably encountered two-byte addresses 
in BASIC. For example, if you need to know where 
your computer's display list is located, you can use 
the BASIC command: 

DLI5T=PEEK 15683 +PEEK (561J»256 



How does this work? Normally, we think of a byte 
as having bit values from 1 to 128 (left to right). In 
order to represent larger numbers, we add a second 
high order byte to the first low order byte. The high 
order byte contains bit values from 2^ (256) to 2^^ 
(32768). This relationship is shown in Figure 5. 
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Figure 5. 

In order for BASIC to reconstruct the number, it 
must multiply each byte by the value of its lowest- 
order bit. In the 2-byte case, the low-order byte is 
multiplied by 1, and the high-order byte is multiplied 
by 256. When the resulting numbers are added 
together, you have the value of the 2-byte number. 

Figure 6 shows some decimal numbers along with 
their two-byte binary equivalents. 



DECIHAL 


HIGH BYTE 


LOU BYTE 


128 


88888888 


18888888 


255 


88888888 


11111111 


256 


80888881 


88888888 


257 


88880881 


86080081 


511 


88888881 


11111111 


512 


88888818 


88888888 


65534 


11111111 


11111118 


8 


88888888 


88888888 



Figure 6. 

You don't have to stop with two bytes, either. For 
example, by using 3 bytes, you can store numbers up 
to 224, or 16,777,216. 4 bytes will give up to 2^^, 
or over 4 billion, and so on. 

CARRYing on. 

How is multi-byte math handled in 6502 assembly 
language? It's the same as single-byte, but with one 
difference. In multi-byte addition, the CARRY flag is 
used to handle carries and borrows. 

You've used carries and borrows all your life, but 
you probably don't think about them. Consider the 
addition of 13+9. When you add 3+9, you get 12. 
Since 12 is greater than the maximum digit value of 
9, you place the units portion (2) in the units posi- 
tion of the result and CARRY the 10 to the next 
digit. This adds to the tens digit of 13, giving 20. 
When this is added to the units portion calculated 
earlier, we get a result of 22. 

In subtraction, if you're subtracting 7 from 20, 7 is 
larger than 0, so a borrow from the next digit is 
necessary. The 2 in the tens position becomes a 1, 
and the 7 is subtracted from the borrowed 10, giving 
a result of 3 in the units position. The final result is 
13. 
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These same principles apply in multi-byte math 
operations. The only difference is the base we are 
operating in. As you recall from the Issue #15 Boot 
Camp, the CARRY flag is set to 1 if the result of an 
addition operation is greater than 255. In single-byte 
addition, we always CLEAR the CARRY flag before 
the ADC operation. In multi-byte adds, the CARRY 
is only cleared before the FIRST addition operation. 
This prevents any unwanted carries from giving 
incorrect results. 



HIGH 

eeeooeoe 
4 eeeseeee 

08888881 



LON 

11111111 

88888881 



(255) 
( 1) 



88868888 (256) 



Figure 7. 

Figure 7 shows how carries work in binary. 
When 1 is added to 255, the resulting value of 256 is 
too large to fit in one byte. The low-order byte wraps 
around to zero and the carry flag is set. The high- 
order bytes are then added, along with the carry flag 
(1). This gives the high-order result a value of 1. 
Remember that the high-order byte of a two-byte 
value is always multiplied by 256. This gives us a 
final value of (1 X 256) + = 256. 

Figure 8 shows the code necessary for this addi- 
tion operation in 6502 assembly code. 



; BINARY HODE 
;GET 255, 
;FIR5T ftDD! 
;ADO 1 TO 255 
;5T0RE LOU RESULT 
;GET OPl HIGH 
jADD 0P2 HIGH, 
;5AUE HIGH RESULT 
;ALL DONE! 
;LOM RESULT BYTE 
;HIGH RESULT BYTE 
;EHD OF ASSEMBLY 



Figure 8. 

Line 10 clears the decimal mode, to make 
sure we're working with binary numbers. 

Line 20 loads 255, the low byte of the first 
operand, into the accumulator. 

Line 30 clears the carry flag for the first add 
operation. ALWAYS remember to clear the 
carry flag for the first add of a multi-byte add 
operation. 

Line 40 adds 1, the low byte of the second 
operand, to the low byte of the first operand. 
This operation will leave a zero in the accumula- 
tor, and the carry flag will be set (1). 

Line 50 stores the result of the low byte add 
in the location labeled RESLO. 

Line 60 loads 0, the high byte of the first 
operand, into the accumulator. 

Line 70 adds 0, the high byte of the first 
operand, to the high byte of the second 



81 


»= 5688 


18 


CLD 


28 


LDA tt255 


38 


CLC 


48 


ADC ttl 


58 


STA RESLO 


68 


LDA tt8 


78 


ADC tt8 


88 


STA HESHI 


98 


BRK 


0188 


RESLO »=»+l 


8118 


RESHI »=»+! 


8128 


.END 



operand. Note that we DID NOT clear the carry 
before this operation, since we want the carry 
status to be taken into account for all adds after 
the first one. In this case, with the carry set, our 
result is 0+0+1, or 1. 

Line 80 stores the result of the high byte 
addition in the location labeled RESHI. 

Line 90 stops the execution of the program 
with the BRK (BREAK) instruction. 

Lines 100 and 110 set up the RESLO and 
RESHI storage areas. Note that these areas are 
set up with the low byte first, followed by the 
high byte. This is the standard 6502 storage 
format for two-byte values, and it's a good idea 
to get accustomed to it. 

Multi-byte subtraction also works the same way as 
the single-byte version, except that the first subtract 
operation is preceded by a SEC (SET CARRY) 
instruction. Figure 9 shows an example of the three- 
byte subtract operation $4203F5 - $2E45FF. When 
finished, the result will be placed in RESL (LOW 
ORDER), RESM (MIDDLE) and RESH (HIGH 
ORDER). Try executing this code and observe that 
the resulting number is $13BDF6. 



BINARY MODE 
GET OPl LOH 
FIRST SUBTRACT 
SUB 0P2 LOH 
SAVE LOM RESULT 
GET OPl MIDDLE 
SUB 0P2 MIDDLE 
SAVE MID RESULT 
GET OPl HI 
SUB 0P2 HIGH 
SAVE HIGH RESULT 
ALL DONE! 
LOH RESULT BYTE 
MID RESULT BYTE 
HIGH RESULT BYTE 
END OF ASSEMBLY 



Figure 9. 

What about the decimal mode? 

Remember how the 6502 uses two different 
methods of storing numbers? We have been looking 
at multi-byte operations in the binary mode. Multi- 
byte decimal mode math works exactly like binary, 
but the data is stored in binary-coded decimal (see 
Issue 15 for a discussion of BCD). All you have to do 
to select BCD math is use the SED (SET DECIMAL 
MODE) instruction at the start of your program. 
You can return to binary math at any time by using 
the CLD (CLEAR DECIMAL MODE) instruction. 

Now that we've looked at the basics of multi-byte 
math, let's make a few generalizations about the 
process. 



81 


«= 5688 


18 


CLD 


28 


LDA tt5F5 


38 


SEC 


48 


SBC it5FF 


58 


STA RESL 


68 


LDA »$83 


78 


SBC «S45 


88 


STA RESM 


98 


LDA Jt542 


8188 


SBC «S2E 


8118 


STA RESH 


8128 


BRK 


8138 


RESL »=#+l 


8140 


RESM #=»+l 


8158 


RESH »=»+l 


8166 


.END 



18 


LDA 


8YTE1A 


;BYTE 1 


15 


CLC 




;0N FIRST ONLY 


28 


ADC 


BYTEIB 




25 


STA 


RESULTl 




38 


LDA 


BYTE2A 


JBYTE2 


35 


ADC 


BYTE2B 
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48 5TA 


RE5ULT2 




45 






58 




;ETC, 


55 






68 LDA 


BYTEnA 


;BYTE n 


65 ADC 


BYTEnB 




78 STA 


RESULTn 
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Figure 10. 

Figure 10 shows the procedure for a multi-byte 
add, where n is the number of bytes in the value. 
Note that the CLC instruction is used only for the 
first add of the group. 



18 


LDA 


BYTEIA 


;BVTE 1 


15 


SEC 




;0N FIRST ONLY! 


28 


SBC 


BYTEIB 




25 


STA 


RESULTl 




38 


LDA 


BYTE2A 


;BYTE2 


35 


SBC 


BYTE2B 




48 


STA 


RESULT2 




45 


, 






58 


, 




;ETC. 


55 


, 






68 


LDA 


BYTEnA 


;BYTE n 


65 


SBC 


BYTEnB 




78 


STA 


RESULTn 





Figure 11 shows the procedure for a multi-byte 
subtract, where n is the number of bytes in the value. 
The subtract procedure is similar to the add in that 
the SEC instruction is only used for the first subtract. 

What happens when you want to add or subtract 
two values of different length, such as adding a one- 
byte value to a three-byte value? Figure 12 shows 
how this is done. 



18 


«= $688 




15 


CLD 


; BINARY NODE 


28 


LDA SCORE 


;GET SCORE LO 


25 


CLC 


; CLEAR 15T JIHE 


38 


ADC POINTS 


;ADD POINTS 


35 


STA SCORE 


;SAME SCORE LO 


48 


LDA SCORE+1 


;GET SCORE MID 


45 


ADC tt8 


;ADD DUNNY ZERO 


58 


STA SCORE+1 


jSAVE SCORE MID 


55 


LDA SCORE+2 


;GET SCORE HIGH 


68 


ADC tt8 


;ADD DUMMY ZERO 


65 


STA SCORE+2 


;SAWE SCORE HIGH 


78 


BRK 


;ALL DONE! 


75 


POINTS »=»+l 


;ONE BYTE 


88 


SCORE «=#+3 


J THREE BYTES 


85 


.END 


J END OF ASSEI«LY 



Figure 12. 



Figure 11. 
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The program in Figure 12 adds the one-byte 
value POINTS to the three-byte value SCORE. In 
this example the three bytes of SCORE are not indi- 
vidually labeled, but are referenced as SCORE 
(LOW ORDER), SCORE+1 (MIDDLE) and 
SCORE+2 (HIGH ORDER). The + 1 and +2 added 
to the label SCORE simply indicate that the assembler 
is to add 1 and 2 to the address of SCORE for these 
operations. For example, if SCORE is located at 
$4000, SCORE+ 1 is address $4001 , and SCORE+2 
is $4002. If we had indicated SCORE- 1, the address 
used would be $3FFF. 

By looking at Figure 12, you will see that the first 
ADC operation adds the low byte of SCORE to 
POINTS, placing the result in SCORE. This is a 
typical first add, with a CLC operation before the 
addition. 

The second and third adds are special in this case. 
Since POINTS is a one-byte field and SCORE is a 
three-byte field, we must complete the last two addi- 
tions as if POINTS were three bytes long. As you can 
see from the example, the second and third adds 
simply add zeros to the second and third bytes of 
SCORE. This ensures that any carries out of the low 
bytes of SCORE will be properly taken care of. By 
adding zeros, the only factor affecting the result is the 
carry flag. 

The challenge. 

No tutorial would be complete without a chal- 
lenge to the readers. For next month try to solve the 
following problems. 

PROBLEM 1: Subtract the two-byte field WITH- 
D (withdrawals) from the three-byte field OLDBAL 
(old balance), placing the result in the three-byte 
field NEWBAL (new balance). All fields should be 
stored in BCD, with standard data storage formats. 
Start with OLDBAL = 108673 and WITHD = 
4285. After the subtraction is complete, check 
NEWBAL to be sure it contains 104388. 

PROBLEM 2: Start with three 10-byte tables. 
Label these tables TABLE 1, TABLE2 and TABLE3. 
Initialize TABLE 1 and TABLE2 as follows: 

TftBLEl .BYTE $10 ,$iS ,$40,$86.$3a 

.BYTE Sfl0,SBC,SC8,SF0,SF8 

TaBLE2 .BYTE $00 ,$9S,Sl4,$2F .SSH 

.BYTE S90,S8B,S22,S65,S78 

Write the code necessary to subtract each byte of 
TABLE2 from the corresponding byte of TABLEl, 
placing the result in TABLE3. That is, subtract the 
first byte of TABLE2 from the first byte of TABLEl 
and place it in the first byte of TABLE3. Repeat this 
process for each of the ten bytes in the tables. When 
complete, TABLE3 should contain the values: 

$lO,$ie,$2C,S57,£0e,$ie,561,$9E,$8B,$88 

These problems should get you thinking about 
multi-byte operations more deeply. Whatever you 
do, don't give up\ Stick with it and you'll soon get the 
hang of it. 

Next month, we'll start looking at the many ways 
to manipulate our friend, the eight-bit byte. D 
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IntnMliidng the Rana 1000 disk drive. It^s a whole new game for Atari <x^ 




This two digit LED readout 
displays a code tlnat tells you 
everything you need to know. 



This beeping button tells you 
your write protect feature is 
keeping your information safe. 



When Rana Systems introduced the Elite 
Series of Apple® compatible disk drives, we didn't 
know what a tremendous impact they would make. 
It turned out to be a line so outstanding in perfor- 
mance, styling, capacity, and price, that it instan- 
taneously made us a major force in the market. 
Well, needless to say the response was so great 
that we were forced to create the same highly ad- 
vanced disk drive for Atari." A disk drive that when 
coupled with Atari's computer, could perform 
ever/thing from accounting, financial planning, 
and stock charting, to word processing, business 
management, and letting you write your own pro- 
grams. Plus, we made it simple enough for a child 
to use, for learning anything from the alphabet to 
a foreign language. 

WDridng with a diskette 
versus playing with a cassette. 

Let's face it. The only reason Atari made a 
cassette option to their computer was to make it 
affordable. But now you don't have to settle for less. 
Because now you can get a diskette for your Atari 
computer which outperforms their cassette and 
costs V3 less than their disk drive. With Atari's cas- 
sette you only get half the functions of a com- 
puter compared to what our floppy disk can give 
you. Their cassette is not only limited in the soft- 
ware available, but it also takes 20 times longer to 
get the information you need. And Rana's disk 



The remaining buttons beep 
when touched, and provide 
readouts on density storage, 
error status, and drive number 



This button beeps when you 
touch it, and the LED readout 
tells you what track you're on. 



drive offers twice the storage capacity of either 
their cassette or disk drive. 

Why even stylewise our new low profile design 
not only looks 100 times more spectacular, but it 
occupies 3 times less space. And our new Rana 
1000 also gives you a piece of its mind every time 
you use it, because our disk drive gives you informa- 
tion as well as takes it. And we think that says a lot. 

Ihedisic drive 
tiiat has ail the answers. 

Rana offers you a myriad of features Atari 
couldn't even conceive of. Like five electronic func- 
tions on the front panel that actually beep and give 
you a LED readout when touched. Our disk drive 
tells you what track you're on, and what density 
and how much information you're storing. It lets 
you switch from a single density of 90,000 letters to 
a double density of 180,000 letters, on a single 
diskette. And, we have a write protect feature which 
protects your diskette from being erased. In fact, 
no other disk drive can offer you that. 

As you can see, it was easy to build a disk 
drive superior to Atari's. Because for every reason 
you buy a disk drive, Rana has superior technology 

The Rana 1000 disk drive. It brings your Atari 
computer to a higher level of sophistication for a 
price one third lower than Atari's. So your choice 
shouldn't even be a matter of logic. 

Just common sense. 



R3ll3SySt6nnS Mways a step ahead. 




21300 Superior Street, Chatsworth, CA 91311 213-709-5484. For dealer information call 
toll free: 1-800-421-2207. In California only call: 1-800-262-1221. Source Number: TCT-654 



R Apple isa registered trademark of Apple Computer, Inc. U) Atari is a registered Irademark of Atari, Inc., a Warner Communications Company. 
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NEXT ISSUE: 

ADVENTURE! 

► Munch*In Climb'In • Crash Dive! (Game) 

• Communications for the Handicapped 
• Adventure Games Review^ed 

Coming in the April ANALOG Computing, 
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SAT SCORE INCREASE WARRANTY 

BACKED BY FULL CASH REFUND 

le best investment you can make in thie education your most precious investment, your children. 

Call or write tor details about Krell's GREAT AMERICAN SAT* CONTEST with $50,000 in prizes, 

SPECIAL SCHOOL DISCOUNT PACKAGE AVAILABLE. 



Krell Soltware Corpore 
Krell's Colleae Board ; 



! CEEB ortheET.S 
uter programs may 



ori. New Jersey, 

th any microcofiiputer including 



Krell's Colleae Board SAT Preparation Series ol microcompuier programs may oe usea wiin any iiiieiueompuiei muiuuiny 
Acorn Apple," Atari, Commodore 64, PET, Kaypro, IBM, Radio Shack, 

Krell Software Corporation does not endorse ttie use of ttie SAT exams In any way. We believe that both the SAT 
Examination System and the examinations themselves are seriously flawed. However, we recognize the needs for 
individual students to perform well on these examinations in order to secure college entrance and scholarships. 
SAT ■ and ■Colloqe Board' are registered trademarks and service marks of the College Entrance Examination Boaid 



N.Y. Residents add sales tax 

Payment in U.S. dollars only 

Prices slightly higher outside U.S. 



KREI£ 



SOHVfARE CORR 



The slate of the art in educational computing 



1320 Stony Brook Road, Stony Brook, New York 11790 (516) 751-5139 



DEALER INQUIRIES 
INVITED 
Call or Write '«mh> 

for FREE CATALOG f^j^^ 






ACORN, APPLE, ATARI, COMMODORE, IBM, KAYPRO, RADIO SHACK 



ACT NOW . . . CALL 8G0-24KRELL 



•Trademarks of Acorn Computer Ltd.. Apple Computer Corp.. 

Atari Computer Co.. Tandy Corp.. Non-Linear Systefna. Inc.. 

Commodore Corp., IBM. 
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SLIP INTO 

SOMETHING 

—WRBO-CHARGED 

■ like the road-scorching 

speedster in RALLY SPEEDWAY 
/ — the game that turns your 
ATARI into a full-blown, four- 
wheeled demon! Tal<e on our 
demanding course, or use the 
unique Construct-A-Track option to 
ijgn your own. Push yourself to the 
limit for a better lap time, or get a 
friend in on the action for a one-on-one 
duel to the finish line — it's vour choice! ' 






^^S£/. 




MAKE TRACKS TO 
YOUR DEALER TODAY! 

ATARI 400/800/1200 CARTRIDGE 

053-0171 $49.95 

If your dealer doesn't have Rally Speedway in 
stock, phone 1-800-327-7172 with your order, or 
write us at Adventure International, P.O, Box 3435, 
Longwood, FL 32750 for your FREE catalog. 

DEALER ORDERS.WELCOME 
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DIVISION OF SCOTT ADAMS. INC. 



